/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / w3 / mm.elc.z / mm.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 33 |on Mon M|ar  9 13|
|00000040| 3a 30 34 3a 35 31 20 31 | 39 39 38 0a 3b 3b 3b 20 |:04:51 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 77 33 2f 6d |s-20.3/l|isp/w3/m|
|000000a0| 6d 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |m.el.;;;| emacs v|
|000000b0| 65 72 73 69 6f 6e 20 32 | 30 2e 34 20 22 45 6d 65 |ersion 2|0.4 "Eme|
|000000c0| 72 61 6c 64 22 20 58 45 | 6d 61 63 73 20 20 4c 75 |rald" XE|macs  Lu|
|000000d0| 63 69 64 2e 0a 3b 3b 3b | 20 62 79 74 65 63 6f 6d |cid..;;;| bytecom|
|000000e0| 70 20 76 65 72 73 69 6f | 6e 20 32 2e 32 35 20 58 |p versio|n 2.25 X|
|000000f0| 45 6d 61 63 73 3b 20 32 | 32 2d 4d 61 72 2d 39 36 |Emacs; 2|2-Mar-96|
|00000100| 2e 0a 3b 3b 3b 20 6f 70 | 74 69 6d 69 7a 61 74 69 |..;;; op|timizati|
|00000110| 6f 6e 20 69 73 20 6f 6e | 2e 0a 3b 3b 3b 20 74 68 |on is on|..;;; th|
|00000120| 69 73 20 66 69 6c 65 20 | 75 73 65 73 20 6f 70 63 |is file |uses opc|
|00000130| 6f 64 65 73 20 77 68 69 | 63 68 20 64 6f 20 6e 6f |odes whi|ch do no|
|00000140| 74 20 65 78 69 73 74 20 | 69 6e 20 45 6d 61 63 73 |t exist |in Emacs|
|00000150| 20 31 39 2e 0a 0a 28 69 | 66 20 28 61 6e 64 20 28 | 19...(i|f (and (|
|00000160| 62 6f 75 6e 64 70 20 27 | 65 6d 61 63 73 2d 76 65 |boundp '|emacs-ve|
|00000170| 72 73 69 6f 6e 29 0a 09 | 20 28 6f 72 20 28 61 6e |rsion)..| (or (an|
|00000180| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 70 6f 63 68 |d (bound|p 'epoch|
|00000190| 3a 3a 76 65 72 73 69 6f | 6e 29 20 65 70 6f 63 68 |::versio|n) epoch|
|000001a0| 3a 3a 76 65 72 73 69 6f | 6e 29 0a 09 20 20 20 20 |::versio|n)..    |
|000001b0| 20 28 73 74 72 69 6e 67 | 2d 6c 65 73 73 70 20 65 | (string|-lessp e|
|000001c0| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 20 22 32 30 |macs-ver|sion "20|
|000001d0| 22 29 29 29 0a 20 20 20 | 20 28 65 72 72 6f 72 20 |"))).   | (error |
|000001e0| 22 60 6d 6d 2e 65 6c 27 | 20 77 61 73 20 63 6f 6d |"`mm.el'| was com|
|000001f0| 70 69 6c 65 64 20 66 6f | 72 20 45 6d 61 63 73 20 |piled fo|r Emacs |
|00000200| 32 30 22 29 29 0a 0a 28 | 6f 72 20 28 62 6f 75 6e |20"))..(|or (boun|
|00000210| 64 70 20 27 63 75 72 72 | 65 6e 74 2d 6c 6f 61 64 |dp 'curr|ent-load|
|00000220| 2d 6c 69 73 74 29 20 28 | 73 65 74 71 20 63 75 72 |-list) (|setq cur|
|00000230| 72 65 6e 74 2d 6c 6f 61 | 64 2d 6c 69 73 74 20 6e |rent-loa|d-list n|
|00000240| 69 6c 29 29 0a 0a 0a 28 | 62 79 74 65 2d 63 6f 64 |il))...(|byte-cod|
|00000250| 65 20 22 c0 c1 21 88 c0 | c2 21 87 22 20 5b 72 65 |e "..!..|.!." [re|
|00000260| 71 75 69 72 65 20 63 6c | 20 64 65 76 69 63 65 73 |quire cl| devices|
|00000270| 5d 20 32 29 0a 23 40 32 | 35 20 56 65 72 73 69 6f |] 2).#@2|5 Versio|
|00000280| 6e 20 23 20 6f 66 20 4d | 4d 20 70 61 63 6b 61 67 |n # of M|M packag|
|00000290| 65 1f 0a 28 64 65 66 63 | 6f 6e 73 74 20 6d 6d 2d |e..(defc|onst mm-|
|000002a0| 76 65 72 73 69 6f 6e 20 | 28 62 79 74 65 2d 63 6f |version |(byte-co|
|000002b0| 64 65 20 22 c0 19 c2 c3 | 09 5c 22 ab 88 09 c4 94 |de "....|.\".....|
|000002c0| c4 95 4f aa 81 09 29 87 | 22 20 5b 22 31 2e 39 36 |..O...).|" ["1.96|
|000002d0| 22 20 78 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |" x stri|ng-match|
|000002e0| 20 22 52 65 76 69 73 69 | 6f 6e 3a 20 5c 5c 28 5b | "Revisi|on: \\([|
|000002f0| 5e 20 09 5c 6e 5d 2b 5c | 5c 29 22 20 31 5d 20 33 |^ .\n]+\|\)" 1] 3|
|00000300| 29 20 28 23 24 20 2e 20 | 36 33 34 29 29 0a 23 40 |) (#$ . |634)).#@|
|00000310| 34 35 20 41 20 73 79 6e | 74 61 78 20 74 61 62 6c |45 A syn|tax tabl|
|00000320| 65 20 66 6f 72 20 70 61 | 72 73 69 6e 67 20 73 67 |e for pa|rsing sg|
|00000330| 6d 6c 20 61 74 74 72 69 | 62 75 74 65 73 2e 1f 0a |ml attri|butes...|
|00000340| 28 64 65 66 76 61 72 20 | 6d 6d 2d 70 61 72 73 65 |(defvar |mm-parse|
|00000350| 2d 61 72 67 73 2d 73 79 | 6e 74 61 78 2d 74 61 62 |-args-sy|ntax-tab|
|00000360| 6c 65 20 28 63 6f 70 79 | 2d 73 79 6e 74 61 78 2d |le (copy|-syntax-|
|00000370| 74 61 62 6c 65 20 65 6d | 61 63 73 2d 6c 69 73 70 |table em|acs-lisp|
|00000380| 2d 6d 6f 64 65 2d 73 79 | 6e 74 61 78 2d 74 61 62 |-mode-sy|ntax-tab|
|00000390| 6c 65 29 20 28 23 24 20 | 2e 20 37 38 37 29 29 0a |le) (#$ |. 787)).|
|000003a0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 c2 0b |(byte-co|de "....|
|000003b0| 23 88 c0 c4 c2 0b 23 88 | c0 c5 c6 0b 23 88 c0 c7 |#.....#.|....#...|
|000003c0| c8 0b 23 87 22 20 5b 6d | 6f 64 69 66 79 2d 73 79 |..#." [m|odify-sy|
|000003d0| 6e 74 61 78 2d 65 6e 74 | 72 79 20 3f 5c 27 20 22 |ntax-ent|ry ?\' "|
|000003e0| 5c 22 22 20 6d 6d 2d 70 | 61 72 73 65 2d 61 72 67 |\"" mm-p|arse-arg|
|000003f0| 73 2d 73 79 6e 74 61 78 | 2d 74 61 62 6c 65 20 3f |s-syntax|-table ?|
|00000400| 5c 60 20 3f 5c 7b 20 22 | 28 22 20 3f 5c 7d 20 22 |\` ?\{ "|(" ?\} "|
|00000410| 29 22 5d 20 34 29 0a 23 | 40 39 37 38 20 2a 54 68 |)"] 4).#|@978 *Th|
|00000420| 65 20 6d 61 69 6c 63 61 | 70 20 73 74 72 75 63 74 |e mailca|p struct|
|00000430| 75 72 65 20 69 73 20 61 | 6e 20 61 73 73 6f 63 20 |ure is a|n assoc |
|00000440| 6c 69 73 74 20 6f 66 20 | 61 73 73 6f 63 20 6c 69 |list of |assoc li|
|00000450| 73 74 73 2e 0a 31 73 74 | 20 61 73 73 6f 63 20 6c |sts..1st| assoc l|
|00000460| 69 73 74 20 69 73 20 6b | 65 79 65 64 20 6f 6e 20 |ist is k|eyed on |
|00000470| 74 68 65 20 6d 61 6a 6f | 72 20 63 6f 6e 74 65 6e |the majo|r conten|
|00000480| 74 2d 74 79 70 65 0a 32 | 6e 64 20 61 73 73 6f 63 |t-type.2|nd assoc|
|00000490| 20 6c 69 73 74 20 69 73 | 20 6b 65 79 65 64 20 6f | list is| keyed o|
|000004a0| 6e 20 74 68 65 20 6d 69 | 6e 6f 72 20 63 6f 6e 74 |n the mi|nor cont|
|000004b0| 65 6e 74 2d 74 79 70 65 | 20 28 77 68 69 63 68 20 |ent-type| (which |
|000004c0| 63 61 6e 20 62 65 20 61 | 20 72 65 67 65 78 70 29 |can be a| regexp)|
|000004d0| 0a 0a 57 68 69 63 68 20 | 6c 6f 6f 6b 73 20 6c 69 |..Which |looks li|
|000004e0| 6b 65 3a 0a 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ke:.----|--------|
|000004f0| 2d 2d 2d 2d 2d 0a 28 0a | 20 28 22 61 70 70 6c 69 |-----.(.| ("appli|
|00000500| 63 61 74 69 6f 6e 22 0a | 20 20 28 22 70 6f 73 74 |cation".|  ("post|
|00000510| 73 63 72 69 70 74 22 20 | 2e 20 3c 69 6e 66 6f 3e |script" |. <info>|
|00000520| 29 0a 20 29 0a 20 28 22 | 74 65 78 74 22 0a 20 20 |). ). ("|text".  |
|00000530| 28 22 70 6c 61 69 6e 22 | 20 2e 20 3c 69 6e 66 6f |("plain"| . <info|
|00000540| 3e 29 0a 20 29 0a 29 0a | 0a 57 68 65 72 65 20 3c |>). ).).|.Where <|
|00000550| 69 6e 66 6f 3e 20 69 73 | 20 61 6e 6f 74 68 65 72 |info> is| another|
|00000560| 20 61 73 73 6f 63 20 6c | 69 73 74 20 6f 66 20 74 | assoc l|ist of t|
|00000570| 68 65 20 76 61 72 69 6f | 75 73 20 69 6e 66 6f 72 |he vario|us infor|
|00000580| 6d 61 74 69 6f 6e 0a 72 | 65 6c 61 74 65 64 20 74 |mation.r|elated t|
|00000590| 6f 20 74 68 65 20 6d 61 | 69 6c 63 61 70 20 52 46 |o the ma|ilcap RF|
|000005a0| 43 2e 20 20 54 68 69 73 | 20 69 73 20 6b 65 79 65 |C.  This| is keye|
|000005b0| 64 20 6f 6e 20 74 68 65 | 20 6c 6f 77 65 72 63 61 |d on the| lowerca|
|000005c0| 73 65 0a 61 74 74 72 69 | 62 75 74 65 20 6e 61 6d |se.attri|bute nam|
|000005d0| 65 20 28 76 69 65 77 65 | 72 2c 20 74 65 73 74 2c |e (viewe|r, test,|
|000005e0| 20 65 74 63 29 2e 20 20 | 54 68 69 73 20 6c 6f 6f | etc).  |This loo|
|000005f0| 6b 73 20 6c 69 6b 65 3a | 0a 28 28 22 76 69 65 77 |ks like:|.(("view|
|00000600| 65 72 22 20 2e 20 76 69 | 65 77 65 72 69 6e 66 6f |er" . vi|ewerinfo|
|00000610| 29 0a 20 28 22 74 65 73 | 74 22 20 20 20 2e 20 74 |). ("tes|t"   . t|
|00000620| 65 73 74 69 6e 66 6f 29 | 0a 20 28 22 78 78 78 78 |estinfo)|. ("xxxx|
|00000630| 22 20 20 20 2e 20 22 73 | 74 72 69 6e 67 22 29 0a |"   . "s|tring").|
|00000640| 29 0a 0a 57 68 65 72 65 | 20 76 69 65 77 65 72 69 |)..Where| vieweri|
|00000650| 6e 66 6f 20 73 70 65 63 | 69 66 69 65 73 20 68 6f |nfo spec|ifies ho|
|00000660| 77 20 74 68 65 20 63 6f | 6e 74 65 6e 74 2d 74 79 |w the co|ntent-ty|
|00000670| 70 65 20 69 73 20 76 69 | 65 77 65 64 2e 20 20 43 |pe is vi|ewed.  C|
|00000680| 61 6e 20 62 65 0a 61 20 | 73 74 72 69 6e 67 2c 20 |an be.a |string, |
|00000690| 69 6e 20 77 68 69 63 68 | 20 63 61 73 65 20 69 74 |in which| case it|
|000006a0| 20 69 73 20 72 75 6e 20 | 74 68 72 6f 75 67 68 20 | is run |through |
|000006b0| 61 20 73 68 65 6c 6c 2c | 20 77 69 74 68 0a 61 70 |a shell,| with.ap|
|000006c0| 70 72 6f 70 72 69 61 74 | 65 20 70 61 72 61 6d 65 |propriat|e parame|
|000006d0| 74 65 72 73 2c 20 6f 72 | 20 61 20 73 79 6d 62 6f |ters, or| a symbo|
|000006e0| 6c 2c 20 69 6e 20 77 68 | 69 63 68 20 63 61 73 65 |l, in wh|ich case|
|000006f0| 20 74 68 65 20 73 79 6d | 62 6f 6c 20 69 73 0a 66 | the sym|bol is.f|
|00000700| 75 6e 63 61 6c 6c 27 64 | 2c 20 77 69 74 68 20 74 |uncall'd|, with t|
|00000710| 68 65 20 62 75 66 66 65 | 72 20 61 73 20 61 6e 20 |he buffe|r as an |
|00000720| 61 72 67 75 6d 65 6e 74 | 2e 0a 0a 74 65 73 74 69 |argument|...testi|
|00000730| 6e 66 6f 20 69 73 20 61 | 20 6c 69 73 74 20 6f 66 |nfo is a| list of|
|00000740| 20 73 74 72 69 6e 67 73 | 2c 20 6f 72 20 6e 69 6c | strings|, or nil|
|00000750| 2e 20 20 49 66 20 6e 69 | 6c 2c 20 69 74 20 6d 65 |.  If ni|l, it me|
|00000760| 61 6e 73 20 74 68 65 0a | 76 69 65 77 65 72 20 73 |ans the.|viewer s|
|00000770| 70 65 63 69 66 69 65 64 | 20 69 73 20 61 6c 77 61 |pecified| is alwa|
|00000780| 79 73 20 76 61 6c 69 64 | 2e 20 20 49 66 20 69 74 |ys valid|.  If it|
|00000790| 20 69 73 20 61 20 6c 69 | 73 74 20 6f 66 20 73 74 | is a li|st of st|
|000007a0| 72 69 6e 67 73 2c 0a 74 | 68 65 73 65 20 61 72 65 |rings,.t|hese are|
|000007b0| 20 75 73 65 64 20 74 6f | 20 64 65 74 65 72 6d 69 | used to| determi|
|000007c0| 6e 65 20 77 68 65 74 68 | 65 72 20 61 20 76 69 65 |ne wheth|er a vie|
|000007d0| 77 65 72 20 70 61 73 73 | 65 73 20 74 68 65 20 27 |wer pass|es the '|
|000007e0| 74 65 73 74 27 20 6f 72 | 0a 6e 6f 74 2e 1f 0a 28 |test' or|.not...(|
|000007f0| 64 65 66 76 61 72 20 6d | 6d 2d 6d 69 6d 65 2d 64 |defvar m|m-mime-d|
|00000800| 61 74 61 20 27 28 28 22 | 6d 75 6c 74 69 70 61 72 |ata '(("|multipar|
|00000810| 74 22 20 28 22 61 6c 74 | 65 72 6e 61 74 69 76 65 |t" ("alt|ernative|
|00000820| 22 20 28 22 76 69 65 77 | 65 72 22 20 2e 20 6d 6d |" ("view|er" . mm|
|00000830| 2d 6d 75 6c 74 69 70 61 | 72 74 2d 76 69 65 77 65 |-multipa|rt-viewe|
|00000840| 72 29 20 28 22 74 79 70 | 65 22 20 2e 20 22 6d 75 |r) ("typ|e" . "mu|
|00000850| 6c 74 69 70 61 72 74 2f | 61 6c 74 65 72 6e 61 74 |ltipart/|alternat|
|00000860| 69 76 65 22 29 29 20 28 | 22 6d 69 78 65 64 22 20 |ive")) (|"mixed" |
|00000870| 28 22 76 69 65 77 65 72 | 22 20 2e 20 6d 6d 2d 6d |("viewer|" . mm-m|
|00000880| 75 6c 74 69 70 61 72 74 | 2d 76 69 65 77 65 72 29 |ultipart|-viewer)|
|00000890| 20 28 22 74 79 70 65 22 | 20 2e 20 22 6d 75 6c 74 | ("type"| . "mult|
|000008a0| 69 70 61 72 74 2f 6d 69 | 78 65 64 22 29 29 20 28 |ipart/mi|xed")) (|
|000008b0| 22 2e 2a 22 20 28 22 76 | 69 65 77 65 72 22 20 2e |".*" ("v|iewer" .|
|000008c0| 20 6d 6d 2d 73 61 76 65 | 2d 62 69 6e 61 72 79 2d | mm-save|-binary-|
|000008d0| 66 69 6c 65 29 20 28 22 | 74 79 70 65 22 20 2e 20 |file) ("|type" . |
|000008e0| 22 6d 75 6c 74 69 70 61 | 72 74 2f 2a 22 29 29 29 |"multipa|rt/*")))|
|000008f0| 20 28 22 61 70 70 6c 69 | 63 61 74 69 6f 6e 22 20 | ("appli|cation" |
|00000900| 28 22 78 2d 78 35 30 39 | 2d 63 61 2d 63 65 72 74 |("x-x509|-ca-cert|
|00000910| 22 20 28 22 76 69 65 77 | 65 72 22 20 2e 20 73 73 |" ("view|er" . ss|
|00000920| 6c 2d 76 69 65 77 2d 73 | 69 74 65 2d 63 65 72 74 |l-view-s|ite-cert|
|00000930| 29 20 28 22 74 65 73 74 | 22 20 66 62 6f 75 6e 64 |) ("test|" fbound|
|00000940| 70 20 27 73 73 6c 2d 76 | 69 65 77 2d 73 69 74 65 |p 'ssl-v|iew-site|
|00000950| 2d 63 65 72 74 29 20 28 | 22 74 79 70 65 22 20 2e |-cert) (|"type" .|
|00000960| 20 22 61 70 70 6c 69 63 | 61 74 69 6f 6e 2f 78 2d | "applic|ation/x-|
|00000970| 78 35 30 39 2d 63 61 2d | 63 65 72 74 22 29 29 20 |x509-ca-|cert")) |
|00000980| 28 22 78 2d 78 35 30 39 | 2d 75 73 65 72 2d 63 65 |("x-x509|-user-ce|
|00000990| 72 74 22 20 28 22 76 69 | 65 77 65 72 22 20 2e 20 |rt" ("vi|ewer" . |
|000009a0| 73 73 6c 2d 76 69 65 77 | 2d 75 73 65 72 2d 63 65 |ssl-view|-user-ce|
|000009b0| 72 74 29 20 28 22 74 65 | 73 74 22 20 66 62 6f 75 |rt) ("te|st" fbou|
|000009c0| 6e 64 70 20 27 73 73 6c | 2d 76 69 65 77 2d 75 73 |ndp 'ssl|-view-us|
|000009d0| 65 72 2d 63 65 72 74 29 | 20 28 22 74 79 70 65 22 |er-cert)| ("type"|
|000009e0| 20 2e 20 22 61 70 70 6c | 69 63 61 74 69 6f 6e 2f | . "appl|ication/|
|000009f0| 78 2d 78 35 30 39 2d 75 | 73 65 72 2d 63 65 72 74 |x-x509-u|ser-cert|
|00000a00| 22 29 29 20 28 22 6f 63 | 74 65 74 2d 73 74 72 65 |")) ("oc|tet-stre|
|00000a10| 61 6d 22 20 28 22 76 69 | 65 77 65 72 22 20 2e 20 |am" ("vi|ewer" . |
|00000a20| 6d 6d 2d 73 61 76 65 2d | 62 69 6e 61 72 79 2d 66 |mm-save-|binary-f|
|00000a30| 69 6c 65 29 20 28 22 74 | 79 70 65 22 20 2e 20 22 |ile) ("t|ype" . "|
|00000a40| 61 70 70 6c 69 63 61 74 | 69 6f 6e 2f 6f 63 74 65 |applicat|ion/octe|
|00000a50| 74 2d 73 74 72 65 61 6d | 22 29 29 20 28 22 64 76 |t-stream|")) ("dv|
|00000a60| 69 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 22 |i" ("vie|wer" . "|
|00000a70| 6f 70 65 6e 20 25 73 22 | 29 20 28 22 74 79 70 65 |open %s"|) ("type|
|00000a80| 22 20 2e 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |" . "app|lication|
|00000a90| 2f 64 76 69 22 29 20 28 | 22 74 65 73 74 22 20 65 |/dvi") (|"test" e|
|00000aa0| 71 20 28 64 65 76 69 63 | 65 2d 74 79 70 65 29 20 |q (devic|e-type) |
|00000ab0| 27 6e 73 29 29 20 28 22 | 64 76 69 22 20 28 22 76 |'ns)) ("|dvi" ("v|
|00000ac0| 69 65 77 65 72 22 20 2e | 20 22 78 64 76 69 20 25 |iewer" .| "xdvi %|
|00000ad0| 73 22 29 20 28 22 74 65 | 73 74 22 20 65 71 20 28 |s") ("te|st" eq (|
|00000ae0| 64 65 76 69 63 65 2d 74 | 79 70 65 29 20 27 78 29 |device-t|ype) 'x)|
|00000af0| 20 28 22 6e 65 65 64 73 | 78 31 31 22 29 20 28 22 | ("needs|x11") ("|
|00000b00| 74 79 70 65 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |type" . |"applica|
|00000b10| 74 69 6f 6e 2f 64 76 69 | 22 29 29 20 28 22 64 76 |tion/dvi|")) ("dv|
|00000b20| 69 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 22 |i" ("vie|wer" . "|
|00000b30| 64 76 69 74 74 79 20 25 | 73 22 29 20 28 22 74 65 |dvitty %|s") ("te|
|00000b40| 73 74 22 20 6e 6f 74 20 | 28 67 65 74 65 6e 76 20 |st" not |(getenv |
|00000b50| 22 44 49 53 50 4c 41 59 | 22 29 29 20 28 22 74 79 |"DISPLAY|")) ("ty|
|00000b60| 70 65 22 20 2e 20 22 61 | 70 70 6c 69 63 61 74 69 |pe" . "a|pplicati|
|00000b70| 6f 6e 2f 64 76 69 22 29 | 29 20 28 22 65 6d 61 63 |on/dvi")|) ("emac|
|00000b80| 73 2d 6c 69 73 70 22 20 | 28 22 76 69 65 77 65 72 |s-lisp" |("viewer|
|00000b90| 22 20 2e 20 6d 6d 2d 6d | 61 79 62 65 2d 65 76 61 |" . mm-m|aybe-eva|
|00000ba0| 6c 29 20 28 22 74 79 70 | 65 22 20 2e 20 22 61 70 |l) ("typ|e" . "ap|
|00000bb0| 70 6c 69 63 61 74 69 6f | 6e 2f 65 6d 61 63 73 2d |plicatio|n/emacs-|
|00000bc0| 6c 69 73 70 22 29 29 20 | 28 22 78 2d 74 61 72 22 |lisp")) |("x-tar"|
|00000bd0| 20 28 22 76 69 65 77 65 | 72 22 20 2e 20 6d 6d 2d | ("viewe|r" . mm-|
|00000be0| 73 61 76 65 2d 62 69 6e | 61 72 79 2d 66 69 6c 65 |save-bin|ary-file|
|00000bf0| 29 20 28 22 74 79 70 65 | 22 20 2e 20 22 61 70 70 |) ("type|" . "app|
|00000c00| 6c 69 63 61 74 69 6f 6e | 2f 78 2d 74 61 72 22 29 |lication|/x-tar")|
|00000c10| 29 20 28 22 78 2d 6c 61 | 74 65 78 22 20 28 22 76 |) ("x-la|tex" ("v|
|00000c20| 69 65 77 65 72 22 20 2e | 20 74 65 78 2d 6d 6f 64 |iewer" .| tex-mod|
|00000c30| 65 29 20 28 22 74 65 73 | 74 22 20 66 62 6f 75 6e |e) ("tes|t" fboun|
|00000c40| 64 70 20 27 74 65 78 2d | 6d 6f 64 65 29 20 28 22 |dp 'tex-|mode) ("|
|00000c50| 74 79 70 65 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |type" . |"applica|
|00000c60| 74 69 6f 6e 2f 78 2d 6c | 61 74 65 78 22 29 29 20 |tion/x-l|atex")) |
|00000c70| 28 22 78 2d 74 65 78 22 | 20 28 22 76 69 65 77 65 |("x-tex"| ("viewe|
|00000c80| 72 22 20 2e 20 74 65 78 | 2d 6d 6f 64 65 29 20 28 |r" . tex|-mode) (|
|00000c90| 22 74 65 73 74 22 20 66 | 62 6f 75 6e 64 70 20 27 |"test" f|boundp '|
|00000ca0| 74 65 78 2d 6d 6f 64 65 | 29 20 28 22 74 79 70 65 |tex-mode|) ("type|
|00000cb0| 22 20 2e 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |" . "app|lication|
|00000cc0| 2f 78 2d 74 65 78 22 29 | 29 20 28 22 6c 61 74 65 |/x-tex")|) ("late|
|00000cd0| 78 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 74 |x" ("vie|wer" . t|
|00000ce0| 65 78 2d 6d 6f 64 65 29 | 20 28 22 74 65 73 74 22 |ex-mode)| ("test"|
|00000cf0| 20 66 62 6f 75 6e 64 70 | 20 27 74 65 78 2d 6d 6f | fboundp| 'tex-mo|
|00000d00| 64 65 29 20 28 22 74 79 | 70 65 22 20 2e 20 22 61 |de) ("ty|pe" . "a|
|00000d10| 70 70 6c 69 63 61 74 69 | 6f 6e 2f 6c 61 74 65 78 |pplicati|on/latex|
|00000d20| 22 29 29 20 28 22 74 65 | 78 22 20 28 22 76 69 65 |")) ("te|x" ("vie|
|00000d30| 77 65 72 22 20 2e 20 74 | 65 78 2d 6d 6f 64 65 29 |wer" . t|ex-mode)|
|00000d40| 20 28 22 74 65 73 74 22 | 20 66 62 6f 75 6e 64 70 | ("test"| fboundp|
|00000d50| 20 27 74 65 78 2d 6d 6f | 64 65 29 20 28 22 74 79 | 'tex-mo|de) ("ty|
|00000d60| 70 65 22 20 2e 20 22 61 | 70 70 6c 69 63 61 74 69 |pe" . "a|pplicati|
|00000d70| 6f 6e 2f 74 65 78 22 29 | 29 20 28 22 74 65 78 69 |on/tex")|) ("texi|
|00000d80| 6e 66 6f 22 20 28 22 76 | 69 65 77 65 72 22 20 2e |nfo" ("v|iewer" .|
|00000d90| 20 74 65 78 69 6e 66 6f | 2d 6d 6f 64 65 29 20 28 | texinfo|-mode) (|
|00000da0| 22 74 65 73 74 22 20 66 | 62 6f 75 6e 64 70 20 27 |"test" f|boundp '|
|00000db0| 74 65 78 69 6e 66 6f 2d | 6d 6f 64 65 29 20 28 22 |texinfo-|mode) ("|
|00000dc0| 74 79 70 65 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |type" . |"applica|
|00000dd0| 74 69 6f 6e 2f 74 65 78 | 22 29 29 20 28 22 7a 69 |tion/tex|")) ("zi|
|00000de0| 70 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 6d |p" ("vie|wer" . m|
|00000df0| 6d 2d 73 61 76 65 2d 62 | 69 6e 61 72 79 2d 66 69 |m-save-b|inary-fi|
|00000e00| 6c 65 29 20 28 22 74 79 | 70 65 22 20 2e 20 22 61 |le) ("ty|pe" . "a|
|00000e10| 70 70 6c 69 63 61 74 69 | 6f 6e 2f 7a 69 70 22 29 |pplicati|on/zip")|
|00000e20| 20 28 22 63 6f 70 69 6f | 75 73 6f 75 74 70 75 74 | ("copio|usoutput|
|00000e30| 22 29 29 20 28 22 70 64 | 66 22 20 28 22 76 69 65 |")) ("pd|f" ("vie|
|00000e40| 77 65 72 22 20 2e 20 22 | 61 63 72 6f 72 65 61 64 |wer" . "|acroread|
|00000e50| 20 25 73 22 29 20 28 22 | 74 79 70 65 22 20 2e 20 | %s") ("|type" . |
|00000e60| 22 61 70 70 6c 69 63 61 | 74 69 6f 6e 2f 70 64 66 |"applica|tion/pdf|
|00000e70| 22 29 29 20 28 22 70 6f | 73 74 73 63 72 69 70 74 |")) ("po|stscript|
|00000e80| 22 20 28 22 76 69 65 77 | 65 72 22 20 2e 20 22 6f |" ("view|er" . "o|
|00000e90| 70 65 6e 20 25 73 22 29 | 20 28 22 74 79 70 65 22 |pen %s")| ("type"|
|00000ea0| 20 2e 20 22 61 70 70 6c | 69 63 61 74 69 6f 6e 2f | . "appl|ication/|
|00000eb0| 70 6f 73 74 73 63 72 69 | 70 74 22 29 20 28 22 74 |postscri|pt") ("t|
|00000ec0| 65 73 74 22 20 65 71 20 | 28 64 65 76 69 63 65 2d |est" eq |(device-|
|00000ed0| 74 79 70 65 29 20 27 6e | 73 29 29 20 28 22 70 6f |type) 'n|s)) ("po|
|00000ee0| 73 74 73 63 72 69 70 74 | 22 20 28 22 76 69 65 77 |stscript|" ("view|
|00000ef0| 65 72 22 20 2e 20 22 67 | 68 6f 73 74 76 69 65 77 |er" . "g|hostview|
|00000f00| 20 25 73 22 29 20 28 22 | 74 79 70 65 22 20 2e 20 | %s") ("|type" . |
|00000f10| 22 61 70 70 6c 69 63 61 | 74 69 6f 6e 2f 70 6f 73 |"applica|tion/pos|
|00000f20| 74 73 63 72 69 70 74 22 | 29 20 28 22 74 65 73 74 |tscript"|) ("test|
|00000f30| 22 20 65 71 20 28 64 65 | 76 69 63 65 2d 74 79 70 |" eq (de|vice-typ|
|00000f40| 65 29 20 27 78 29 20 28 | 22 6e 65 65 64 73 78 31 |e) 'x) (|"needsx1|
|00000f50| 31 22 29 29 20 28 22 70 | 6f 73 74 73 63 72 69 70 |1")) ("p|ostscrip|
|00000f60| 74 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 22 |t" ("vie|wer" . "|
|00000f70| 70 73 32 61 73 63 69 69 | 20 25 73 22 29 20 28 22 |ps2ascii| %s") ("|
|00000f80| 74 79 70 65 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |type" . |"applica|
|00000f90| 74 69 6f 6e 2f 70 6f 73 | 74 73 63 72 69 70 74 22 |tion/pos|tscript"|
|00000fa0| 29 20 28 22 74 65 73 74 | 22 20 6e 6f 74 20 28 67 |) ("test|" not (g|
|00000fb0| 65 74 65 6e 76 20 22 44 | 49 53 50 4c 41 59 22 29 |etenv "D|ISPLAY")|
|00000fc0| 29 20 28 22 63 6f 70 69 | 6f 75 73 6f 75 74 70 75 |) ("copi|ousoutpu|
|00000fd0| 74 22 29 29 29 20 28 22 | 61 75 64 69 6f 22 20 28 |t"))) ("|audio" (|
|00000fe0| 22 78 2d 6d 70 65 67 22 | 20 28 22 76 69 65 77 65 |"x-mpeg"| ("viewe|
|00000ff0| 72 22 20 2e 20 22 6d 61 | 70 6c 61 79 20 25 73 22 |r" . "ma|play %s"|
|00001000| 29 20 28 22 74 79 70 65 | 22 20 2e 20 22 61 75 64 |) ("type|" . "aud|
|00001010| 69 6f 2f 78 2d 6d 70 65 | 67 22 29 29 20 28 22 2e |io/x-mpe|g")) (".|
|00001020| 2a 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 6d |*" ("vie|wer" . m|
|00001030| 6d 2d 70 6c 61 79 2d 73 | 6f 75 6e 64 2d 66 69 6c |m-play-s|ound-fil|
|00001040| 65 29 20 28 22 74 65 73 | 74 22 20 6f 72 20 28 66 |e) ("tes|t" or (f|
|00001050| 65 61 74 75 72 65 70 20 | 27 6e 61 73 2d 73 6f 75 |eaturep |'nas-sou|
|00001060| 6e 64 29 20 28 66 65 61 | 74 75 72 65 70 20 27 6e |nd) (fea|turep 'n|
|00001070| 61 74 69 76 65 2d 73 6f | 75 6e 64 29 29 20 28 22 |ative-so|und)) ("|
|00001080| 74 79 70 65 22 20 2e 20 | 22 61 75 64 69 6f 2f 2a |type" . |"audio/*|
|00001090| 22 29 29 20 28 22 2e 2a | 22 20 28 22 76 69 65 77 |")) (".*|" ("view|
|000010a0| 65 72 22 20 2e 20 22 73 | 68 6f 77 61 75 64 69 6f |er" . "s|howaudio|
|000010b0| 22 29 20 28 22 74 79 70 | 65 22 20 2e 20 22 61 75 |") ("typ|e" . "au|
|000010c0| 64 69 6f 2f 2a 22 29 29 | 29 20 28 22 6d 65 73 73 |dio/*"))|) ("mess|
|000010d0| 61 67 65 22 20 28 22 72 | 66 63 2d 2a 38 32 32 22 |age" ("r|fc-*822"|
|000010e0| 20 28 22 76 69 65 77 65 | 72 22 20 2e 20 76 6d 2d | ("viewe|r" . vm-|
|000010f0| 6d 6f 64 65 29 20 28 22 | 74 65 73 74 22 20 66 62 |mode) ("|test" fb|
|00001100| 6f 75 6e 64 70 20 27 76 | 6d 2d 6d 6f 64 65 29 20 |oundp 'v|m-mode) |
|00001110| 28 22 74 79 70 65 22 20 | 2e 20 22 6d 65 73 73 61 |("type" |. "messa|
|00001120| 67 65 2f 72 66 63 2d 38 | 32 32 22 29 29 20 28 22 |ge/rfc-8|22")) ("|
|00001130| 72 66 63 2d 2a 38 32 32 | 22 20 28 22 76 69 65 77 |rfc-*822|" ("view|
|00001140| 65 72 22 20 2e 20 77 33 | 2d 6d 6f 64 65 29 20 28 |er" . w3|-mode) (|
|00001150| 22 74 65 73 74 22 20 66 | 62 6f 75 6e 64 70 20 27 |"test" f|boundp '|
|00001160| 77 33 2d 6d 6f 64 65 29 | 20 28 22 74 79 70 65 22 |w3-mode)| ("type"|
|00001170| 20 2e 20 22 6d 65 73 73 | 61 67 65 2f 72 66 63 2d | . "mess|age/rfc-|
|00001180| 38 32 32 22 29 29 20 28 | 22 72 66 63 2d 2a 38 32 |822")) (|"rfc-*82|
|00001190| 32 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 76 |2" ("vie|wer" . v|
|000011a0| 69 65 77 2d 6d 6f 64 65 | 29 20 28 22 74 65 73 74 |iew-mode|) ("test|
|000011b0| 22 20 66 62 6f 75 6e 64 | 70 20 27 76 69 65 77 2d |" fbound|p 'view-|
|000011c0| 6d 6f 64 65 29 20 28 22 | 74 79 70 65 22 20 2e 20 |mode) ("|type" . |
|000011d0| 22 6d 65 73 73 61 67 65 | 2f 72 66 63 2d 38 32 32 |"message|/rfc-822|
|000011e0| 22 29 29 20 28 22 72 66 | 63 2d 2a 38 32 32 22 20 |")) ("rf|c-*822" |
|000011f0| 28 22 76 69 65 77 65 72 | 22 20 2e 20 66 75 6e 64 |("viewer|" . fund|
|00001200| 61 6d 65 6e 74 61 6c 2d | 6d 6f 64 65 29 20 28 22 |amental-|mode) ("|
|00001210| 74 79 70 65 22 20 2e 20 | 22 6d 65 73 73 61 67 65 |type" . |"message|
|00001220| 2f 72 66 63 2d 38 32 32 | 22 29 29 29 20 28 22 69 |/rfc-822|"))) ("i|
|00001230| 6d 61 67 65 22 20 28 22 | 78 2d 78 77 64 22 20 28 |mage" ("|x-xwd" (|
|00001240| 22 76 69 65 77 65 72 22 | 20 2e 20 22 78 77 75 64 |"viewer"| . "xwud|
|00001250| 20 2d 69 6e 20 25 73 22 | 29 20 28 22 74 79 70 65 | -in %s"|) ("type|
|00001260| 22 20 2e 20 22 69 6d 61 | 67 65 2f 78 2d 78 77 64 |" . "ima|ge/x-xwd|
|00001270| 22 29 20 28 22 63 6f 6d | 70 6f 73 65 22 20 2e 20 |") ("com|pose" . |
|00001280| 22 78 77 64 20 2d 66 72 | 61 6d 65 20 3e 20 25 73 |"xwd -fr|ame > %s|
|00001290| 22 29 20 28 22 74 65 73 | 74 22 20 65 71 20 28 64 |") ("tes|t" eq (d|
|000012a0| 65 76 69 63 65 2d 74 79 | 70 65 29 20 27 78 29 20 |evice-ty|pe) 'x) |
|000012b0| 28 22 6e 65 65 64 73 78 | 31 31 22 29 29 20 28 22 |("needsx|11")) ("|
|000012c0| 78 31 31 2d 64 75 6d 70 | 22 20 28 22 76 69 65 77 |x11-dump|" ("view|
|000012d0| 65 72 22 20 2e 20 22 78 | 77 75 64 20 2d 69 6e 20 |er" . "x|wud -in |
|000012e0| 25 73 22 29 20 28 22 74 | 79 70 65 22 20 2e 20 22 |%s") ("t|ype" . "|
|000012f0| 69 6d 61 67 65 2f 78 2d | 78 77 64 22 29 20 28 22 |image/x-|xwd") ("|
|00001300| 63 6f 6d 70 6f 73 65 22 | 20 2e 20 22 78 77 64 20 |compose"| . "xwd |
|00001310| 2d 66 72 61 6d 65 20 3e | 20 25 73 22 29 20 28 22 |-frame >| %s") ("|
|00001320| 74 65 73 74 22 20 65 71 | 20 28 64 65 76 69 63 65 |test" eq| (device|
|00001330| 2d 74 79 70 65 29 20 27 | 78 29 20 28 22 6e 65 65 |-type) '|x) ("nee|
|00001340| 64 73 78 31 31 22 29 29 | 20 28 22 77 69 6e 64 6f |dsx11"))| ("windo|
|00001350| 77 64 75 6d 70 22 20 28 | 22 76 69 65 77 65 72 22 |wdump" (|"viewer"|
|00001360| 20 2e 20 22 78 77 75 64 | 20 2d 69 6e 20 25 73 22 | . "xwud| -in %s"|
|00001370| 29 20 28 22 74 79 70 65 | 22 20 2e 20 22 69 6d 61 |) ("type|" . "ima|
|00001380| 67 65 2f 78 2d 78 77 64 | 22 29 20 28 22 63 6f 6d |ge/x-xwd|") ("com|
|00001390| 70 6f 73 65 22 20 2e 20 | 22 78 77 64 20 2d 66 72 |pose" . |"xwd -fr|
|000013a0| 61 6d 65 20 3e 20 25 73 | 22 29 20 28 22 74 65 73 |ame > %s|") ("tes|
|000013b0| 74 22 20 65 71 20 28 64 | 65 76 69 63 65 2d 74 79 |t" eq (d|evice-ty|
|000013c0| 70 65 29 20 27 78 29 20 | 28 22 6e 65 65 64 73 78 |pe) 'x) |("needsx|
|000013d0| 31 31 22 29 29 20 28 22 | 2e 2a 22 20 28 22 76 69 |11")) ("|.*" ("vi|
|000013e0| 65 77 65 72 22 20 2e 20 | 22 6f 70 65 6e 20 25 73 |ewer" . |"open %s|
|000013f0| 22 29 20 28 22 74 79 70 | 65 22 20 2e 20 22 69 6d |") ("typ|e" . "im|
|00001400| 61 67 65 2f 2a 22 29 20 | 28 22 74 65 73 74 22 20 |age/*") |("test" |
|00001410| 65 71 20 28 64 65 76 69 | 63 65 2d 74 79 70 65 29 |eq (devi|ce-type)|
|00001420| 20 27 6e 73 29 29 20 28 | 22 2e 2a 22 20 28 22 76 | 'ns)) (|".*" ("v|
|00001430| 69 65 77 65 72 22 20 2e | 20 22 78 76 20 2d 70 65 |iewer" .| "xv -pe|
|00001440| 72 66 65 63 74 20 25 73 | 22 29 20 28 22 74 79 70 |rfect %s|") ("typ|
|00001450| 65 22 20 2e 20 22 69 6d | 61 67 65 2f 2a 22 29 20 |e" . "im|age/*") |
|00001460| 28 22 74 65 73 74 22 20 | 65 71 20 28 64 65 76 69 |("test" |eq (devi|
|00001470| 63 65 2d 74 79 70 65 29 | 20 27 78 29 20 28 22 6e |ce-type)| 'x) ("n|
|00001480| 65 65 64 73 78 31 31 22 | 29 29 29 20 28 22 74 65 |eedsx11"|))) ("te|
|00001490| 78 74 22 20 28 22 70 6c | 61 69 6e 22 20 28 22 76 |xt" ("pl|ain" ("v|
|000014a0| 69 65 77 65 72 22 20 2e | 20 77 33 2d 6d 6f 64 65 |iewer" .| w3-mode|
|000014b0| 29 20 28 22 74 65 73 74 | 22 20 66 62 6f 75 6e 64 |) ("test|" fbound|
|000014c0| 70 20 27 77 33 2d 6d 6f | 64 65 29 20 28 22 74 79 |p 'w3-mo|de) ("ty|
|000014d0| 70 65 22 20 2e 20 22 74 | 65 78 74 2f 70 6c 61 69 |pe" . "t|ext/plai|
|000014e0| 6e 22 29 29 20 28 22 70 | 6c 61 69 6e 22 20 28 22 |n")) ("p|lain" ("|
|000014f0| 76 69 65 77 65 72 22 20 | 2e 20 76 69 65 77 2d 6d |viewer" |. view-m|
|00001500| 6f 64 65 29 20 28 22 74 | 65 73 74 22 20 66 62 6f |ode) ("t|est" fbo|
|00001510| 75 6e 64 70 20 27 76 69 | 65 77 2d 6d 6f 64 65 29 |undp 'vi|ew-mode)|
|00001520| 20 28 22 74 79 70 65 22 | 20 2e 20 22 74 65 78 74 | ("type"| . "text|
|00001530| 2f 70 6c 61 69 6e 22 29 | 29 20 28 22 70 6c 61 69 |/plain")|) ("plai|
|00001540| 6e 22 20 28 22 76 69 65 | 77 65 72 22 20 2e 20 66 |n" ("vie|wer" . f|
|00001550| 75 6e 64 61 6d 65 6e 74 | 61 6c 2d 6d 6f 64 65 29 |undament|al-mode)|
|00001560| 20 28 22 74 79 70 65 22 | 20 2e 20 22 74 65 78 74 | ("type"| . "text|
|00001570| 2f 70 6c 61 69 6e 22 29 | 29 20 28 22 65 6e 72 69 |/plain")|) ("enri|
|00001580| 63 68 65 64 22 20 28 22 | 76 69 65 77 65 72 22 20 |ched" ("|viewer" |
|00001590| 2e 20 65 6e 72 69 63 68 | 65 64 2d 64 65 63 6f 64 |. enrich|ed-decod|
|000015a0| 65 2d 72 65 67 69 6f 6e | 29 20 28 22 74 65 73 74 |e-region|) ("test|
|000015b0| 22 20 66 62 6f 75 6e 64 | 70 20 27 65 6e 72 69 63 |" fbound|p 'enric|
|000015c0| 68 65 64 2d 64 65 63 6f | 64 65 2d 72 65 67 69 6f |hed-deco|de-regio|
|000015d0| 6e 29 20 28 22 74 79 70 | 65 22 20 2e 20 22 74 65 |n) ("typ|e" . "te|
|000015e0| 78 74 2f 65 6e 72 69 63 | 68 65 64 22 29 29 20 28 |xt/enric|hed")) (|
|000015f0| 22 68 74 6d 6c 22 20 28 | 22 76 69 65 77 65 72 22 |"html" (|"viewer"|
|00001600| 20 2e 20 77 33 2d 70 72 | 65 70 61 72 65 2d 62 75 | . w3-pr|epare-bu|
|00001610| 66 66 65 72 29 20 28 22 | 74 65 73 74 22 20 66 62 |ffer) ("|test" fb|
|00001620| 6f 75 6e 64 70 20 27 77 | 33 2d 70 72 65 70 61 72 |oundp 'w|3-prepar|
|00001630| 65 2d 62 75 66 66 65 72 | 29 20 28 22 74 79 70 65 |e-buffer|) ("type|
|00001640| 22 20 2e 20 22 74 65 78 | 74 2f 68 74 6d 6c 22 29 |" . "tex|t/html")|
|00001650| 29 29 20 28 22 76 69 64 | 65 6f 22 20 28 22 6d 70 |)) ("vid|eo" ("mp|
|00001660| 65 67 22 20 28 22 76 69 | 65 77 65 72 22 20 2e 20 |eg" ("vi|ewer" . |
|00001670| 22 6d 70 65 67 5f 70 6c | 61 79 20 25 73 22 29 20 |"mpeg_pl|ay %s") |
|00001680| 28 22 74 79 70 65 22 20 | 2e 20 22 76 69 64 65 6f |("type" |. "video|
|00001690| 2f 6d 70 65 67 22 29 20 | 28 22 74 65 73 74 22 20 |/mpeg") |("test" |
|000016a0| 65 71 20 28 64 65 76 69 | 63 65 2d 74 79 70 65 29 |eq (devi|ce-type)|
|000016b0| 20 27 78 29 20 28 22 6e | 65 65 64 73 78 31 31 22 | 'x) ("n|eedsx11"|
|000016c0| 29 29 29 20 28 22 78 2d | 77 6f 72 6c 64 22 20 28 |))) ("x-|world" (|
|000016d0| 22 78 2d 76 72 6d 6c 22 | 20 28 22 76 69 65 77 65 |"x-vrml"| ("viewe|
|000016e0| 72 22 20 2e 20 22 77 65 | 62 73 70 61 63 65 20 2d |r" . "we|bspace -|
|000016f0| 72 65 6d 6f 74 65 20 25 | 73 20 2d 55 52 4c 20 25 |remote %|s -URL %|
|00001700| 75 22 29 20 28 22 74 79 | 70 65 22 20 2e 20 22 78 |u") ("ty|pe" . "x|
|00001710| 2d 77 6f 72 6c 64 2f 78 | 2d 76 72 6d 6c 22 29 20 |-world/x|-vrml") |
|00001720| 28 22 64 65 73 63 72 69 | 70 74 69 6f 6e 22 20 22 |("descri|ption" "|
|00001730| 56 52 4d 4c 20 64 6f 63 | 75 6d 65 6e 74 22 29 29 |VRML doc|ument"))|
|00001740| 29 20 28 22 61 72 63 68 | 69 76 65 22 20 28 22 74 |) ("arch|ive" ("t|
|00001750| 61 72 22 20 28 22 76 69 | 65 77 65 72 22 20 2e 20 |ar" ("vi|ewer" . |
|00001760| 74 61 72 2d 6d 6f 64 65 | 29 20 28 22 74 79 70 65 |tar-mode|) ("type|
|00001770| 22 20 2e 20 22 61 72 63 | 68 69 76 65 2f 74 61 72 |" . "arc|hive/tar|
|00001780| 22 29 20 28 22 74 65 73 | 74 22 20 66 62 6f 75 6e |") ("tes|t" fboun|
|00001790| 64 70 20 27 74 61 72 2d | 6d 6f 64 65 29 29 29 29 |dp 'tar-|mode))))|
|000017a0| 20 28 23 24 20 2e 20 2d | 31 30 35 33 29 29 0a 23 | (#$ . -|1053)).#|
|000017b0| 40 37 30 20 2a 41 6e 20 | 61 73 73 6f 63 20 6c 69 |@70 *An |assoc li|
|000017c0| 73 74 20 6f 66 20 63 6f | 6e 74 65 6e 74 2d 74 72 |st of co|ntent-tr|
|000017d0| 61 6e 73 66 65 72 2d 65 | 6e 63 6f 64 69 6e 67 73 |ansfer-e|ncodings|
|000017e0| 20 61 6e 64 20 68 6f 77 | 20 74 6f 20 64 65 63 6f | and how| to deco|
|000017f0| 64 65 20 74 68 65 6d 2e | 1f 0a 28 64 65 66 76 61 |de them.|..(defva|
|00001800| 72 20 6d 6d 2d 63 6f 6e | 74 65 6e 74 2d 74 72 61 |r mm-con|tent-tra|
|00001810| 6e 73 66 65 72 2d 65 6e | 63 6f 64 69 6e 67 73 20 |nsfer-en|codings |
|00001820| 27 28 28 22 62 61 73 65 | 36 34 22 20 2e 20 62 61 |'(("base|64" . ba|
|00001830| 73 65 36 34 2d 64 65 63 | 6f 64 65 2d 72 65 67 69 |se64-dec|ode-regi|
|00001840| 6f 6e 29 20 28 22 37 62 | 69 74 22 20 2e 20 69 67 |on) ("7b|it" . ig|
|00001850| 6e 6f 72 65 29 20 28 22 | 38 62 69 74 22 20 2e 20 |nore) ("|8bit" . |
|00001860| 69 67 6e 6f 72 65 29 20 | 28 22 62 69 6e 61 72 79 |ignore) |("binary|
|00001870| 22 20 2e 20 69 67 6e 6f | 72 65 29 20 28 22 78 2d |" . igno|re) ("x-|
|00001880| 63 6f 6d 70 72 65 73 73 | 22 20 22 75 6e 63 6f 6d |compress|" "uncom|
|00001890| 70 72 65 73 73 22 20 22 | 2d 63 22 29 20 28 22 78 |press" "|-c") ("x|
|000018a0| 2d 67 7a 69 70 22 20 22 | 67 7a 69 70 22 20 22 2d |-gzip" "|gzip" "-|
|000018b0| 64 63 22 29 20 28 22 63 | 6f 6d 70 72 65 73 73 22 |dc") ("c|ompress"|
|000018c0| 20 22 75 6e 63 6f 6d 70 | 72 65 73 73 22 20 22 2d | "uncomp|ress" "-|
|000018d0| 63 22 29 20 28 22 67 7a | 69 70 22 20 22 67 7a 69 |c") ("gz|ip" "gzi|
|000018e0| 70 22 20 22 2d 64 63 22 | 29 20 28 22 78 2d 68 71 |p" "-dc"|) ("x-hq|
|000018f0| 78 22 20 22 6d 63 76 65 | 72 74 22 20 22 2d 50 22 |x" "mcve|rt" "-P"|
|00001900| 20 22 2d 73 22 20 22 2d | 53 22 29 20 28 22 71 75 | "-s" "-|S") ("qu|
|00001910| 6f 74 65 64 2d 70 72 69 | 6e 74 61 62 6c 65 22 20 |oted-pri|ntable" |
|00001920| 2e 20 6d 6d 2d 64 65 63 | 6f 64 65 2d 71 75 6f 74 |. mm-dec|ode-quot|
|00001930| 65 64 2d 70 72 69 6e 74 | 61 62 6c 65 29 29 20 28 |ed-print|able)) (|
|00001940| 23 24 20 2e 20 2d 36 30 | 36 38 29 29 0a 23 40 34 |#$ . -60|68)).#@4|
|00001950| 37 20 2a 57 68 65 72 65 | 20 64 6f 77 6e 6c 6f 61 |7 *Where| downloa|
|00001960| 64 65 64 20 66 69 6c 65 | 73 20 73 68 6f 75 6c 64 |ded file|s should|
|00001970| 20 67 6f 20 62 79 20 64 | 65 66 61 75 6c 74 2e 1f | go by d|efault..|
|00001980| 0a 28 64 65 66 76 61 72 | 20 6d 6d 2d 64 6f 77 6e |.(defvar| mm-down|
|00001990| 6c 6f 61 64 2d 64 69 72 | 65 63 74 6f 72 79 20 6e |load-dir|ectory n|
|000019a0| 69 6c 20 28 23 24 20 2e | 20 2d 36 34 38 32 29 29 |il (#$ .| -6482))|
|000019b0| 0a 23 40 32 38 20 2a 57 | 68 65 72 65 20 74 65 6d |.#@28 *W|here tem|
|000019c0| 70 6f 72 61 72 79 20 66 | 69 6c 65 73 20 67 6f 2e |porary f|iles go.|
|000019d0| 1f 0a 28 64 65 66 76 61 | 72 20 6d 6d 2d 74 65 6d |..(defva|r mm-tem|
|000019e0| 70 6f 72 61 72 79 2d 64 | 69 72 65 63 74 6f 72 79 |porary-d|irectory|
|000019f0| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 21 | (byte-c|ode "..!|
|00001a00| ae 81 c2 87 22 20 5b 67 | 65 74 65 6e 76 20 22 54 |...." [g|etenv "T|
|00001a10| 4d 50 44 49 52 22 20 22 | 2f 74 6d 70 22 5d 20 32 |MPDIR" "|/tmp"] 2|
|00001a20| 29 20 28 23 24 20 2e 20 | 2d 36 35 38 32 29 29 0a |) (#$ . |-6582)).|
|00001a30| 23 40 35 34 20 47 65 6e | 65 72 61 74 65 20 61 20 |#@54 Gen|erate a |
|00001a40| 75 6e 69 71 75 65 20 66 | 69 6c 65 6e 61 6d 65 20 |unique f|ilename |
|00001a50| 69 6e 20 6d 6d 2d 74 65 | 6d 70 6f 72 61 72 79 2d |in mm-te|mporary-|
|00001a60| 64 69 72 65 63 74 6f 72 | 79 1f 0a 28 64 65 66 61 |director|y..(defa|
|00001a70| 6c 69 61 73 20 27 6d 6d | 2d 67 65 6e 65 72 61 74 |lias 'mm|-generat|
|00001a80| 65 2d 75 6e 69 71 75 65 | 2d 66 69 6c 65 6e 61 6d |e-unique|-filenam|
|00001a90| 65 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 66 |e #[(&op|tional f|
|00001aa0| 6d 74 29 20 22 08 ac b8 | c1 c2 c3 20 5c 22 c4 c5 |mt) "...|... \"..|
|00001ab0| 1e 06 1e 07 1e 08 c1 c9 | 0e 08 0e 06 23 16 07 ca |........|....#...|
|00001ac0| cb 0e 07 0e 0c 5c 22 21 | ab 90 0e 06 54 16 06 0e |.....\"!|....T...|
|00001ad0| 08 cd 0e 06 21 50 16 07 | aa 66 cb 0e 07 0e 0c 5c |....!P..|.f.....\|
|00001ae0| 22 2b 87 ce cd c3 20 21 | 50 c4 c5 1e 06 1e 07 1e |"+.... !|P.......|
|00001af0| 08 c1 08 0e 08 cd 0e 06 | 21 50 5c 22 16 07 ca cb |........|!P\"....|
|00001b00| 0e 07 0e 0c 5c 22 21 ab | 93 0e 06 54 16 06 c1 08 |....\"!.|...T....|
|00001b10| 0e 08 cd 0e 06 21 50 5c | 22 16 07 aa 63 cb 0e 07 |.....!P\|"...c...|
|00001b20| 0e 0c 5c 22 2b 87 22 20 | 5b 66 6d 74 20 66 6f 72 |..\"+." |[fmt for|
|00001b30| 6d 61 74 20 22 6d 6d 2d | 74 6d 70 2e 25 64 22 20 |mat "mm-|tmp.%d" |
|00001b40| 75 73 65 72 2d 72 65 61 | 6c 2d 75 69 64 20 22 22 |user-rea|l-uid ""|
|00001b50| 20 30 20 78 20 66 6e 61 | 6d 65 20 62 61 73 65 20 | 0 x fna|me base |
|00001b60| 22 25 73 25 64 22 20 66 | 69 6c 65 2d 65 78 69 73 |"%s%d" f|ile-exis|
|00001b70| 74 73 2d 70 20 65 78 70 | 61 6e 64 2d 66 69 6c 65 |ts-p exp|and-file|
|00001b80| 2d 6e 61 6d 65 20 6d 6d | 2d 74 65 6d 70 6f 72 61 |-name mm|-tempora|
|00001b90| 72 79 2d 64 69 72 65 63 | 74 6f 72 79 20 69 6e 74 |ry-direc|tory int|
|00001ba0| 2d 74 6f 2d 73 74 72 69 | 6e 67 20 22 6d 6d 22 5d |-to-stri|ng "mm"]|
|00001bb0| 20 35 20 28 23 24 20 2e | 20 36 37 30 39 29 5d 29 | 5 (#$ .| 6709)])|
|00001bc0| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 21 |.(byte-c|ode "..!|
|00001bd0| ab 8c c2 c1 4b 21 ab 86 | c3 c1 4d 88 aa 84 c3 c4 |....K!..|..M.....|
|00001be0| 4d 88 c5 c6 21 88 c0 c7 | 21 ac 86 c8 c9 4d 88 aa |M...!...|!....M..|
|00001bf0| 84 c8 c7 4d 88 c0 87 22 | 20 5b 66 62 6f 75 6e 64 |...M..."| [fbound|
|00001c00| 70 20 63 6f 70 79 2d 74 | 72 65 65 20 73 75 62 72 |p copy-t|ree subr|
|00001c10| 70 20 6d 6d 2d 63 6f 70 | 79 2d 74 72 65 65 20 23 |p mm-cop|y-tree #|
|00001c20| 5b 28 74 72 65 65 29 20 | 22 08 3a ab 8a c1 08 40 |[(tree) |".:....@|
|00001c30| 21 c1 08 41 21 42 87 c2 | 08 21 ab 9f c3 08 21 89 |!..A!B..|.!....!.|
|00001c40| 1c 47 53 89 1d c6 59 ab | 8f 0c 0d c1 0c 0d 48 21 |.GS...Y.|......H!|
|00001c50| 49 88 0d 53 89 15 aa 6d | 0c 2a 87 08 87 22 20 5b |I..S...m|.*..." [|
|00001c60| 74 72 65 65 20 6d 6d 2d | 63 6f 70 79 2d 74 72 65 |tree mm-|copy-tre|
|00001c70| 65 20 76 65 63 74 6f 72 | 70 20 63 6f 70 79 2d 73 |e vector|p copy-s|
|00001c80| 65 71 75 65 6e 63 65 20 | 6e 65 77 20 69 20 30 5d |equence |new i 0]|
|00001c90| 20 36 5d 20 72 65 71 75 | 69 72 65 20 6d 75 6c 65 | 6] requ|ire mule|
|00001ca0| 2d 73 79 73 64 70 20 77 | 33 2d 73 61 76 65 2d 62 |-sysdp w|3-save-b|
|00001cb0| 69 6e 61 72 79 2d 66 69 | 6c 65 20 6d 6d 2d 73 61 |inary-fi|le mm-sa|
|00001cc0| 76 65 2d 62 69 6e 61 72 | 79 2d 66 69 6c 65 20 23 |ve-binar|y-file #|
|00001cd0| 5b 6e 69 6c 20 22 70 c0 | c1 5c 6e ae 81 c3 c4 c5 |[nil "p.|.\n.....|
|00001ce0| c6 21 21 c7 c4 c5 c6 21 | 21 25 c7 1e 08 1e 09 89 |.!!....!|!%......|
|00001cf0| 1e 5c 6e 71 88 cb 65 64 | 0e 09 23 88 cc 70 21 2b |.\nq..ed|..#..p!+|
|00001d00| 87 22 20 5b 72 65 61 64 | 2d 66 69 6c 65 2d 6e 61 |." [read|-file-na|
|00001d10| 6d 65 20 22 46 69 6c 65 | 6e 61 6d 65 20 74 6f 20 |me "File|name to |
|00001d20| 73 61 76 65 20 61 73 3a | 20 22 20 6d 6d 2d 64 6f |save as:| " mm-do|
|00001d30| 77 6e 6c 6f 61 64 2d 64 | 69 72 65 63 74 6f 72 79 |wnload-d|irectory|
|00001d40| 20 22 7e 2f 22 20 66 69 | 6c 65 2d 6e 61 6d 65 2d | "~/" fi|le-name-|
|00001d50| 6e 6f 6e 64 69 72 65 63 | 74 6f 72 79 20 75 72 6c |nondirec|tory url|
|00001d60| 2d 76 69 65 77 2d 75 72 | 6c 20 74 20 6e 69 6c 20 |-view-ur|l t nil |
|00001d70| 72 65 71 75 69 72 65 2d | 66 69 6e 61 6c 2d 6e 65 |require-|final-ne|
|00001d80| 77 6c 69 6e 65 20 66 69 | 6c 65 20 6f 6c 64 2d 62 |wline fi|le old-b|
|00001d90| 75 66 66 20 6d 75 6c 65 | 2d 77 72 69 74 65 2d 72 |uff mule|-write-r|
|00001da0| 65 67 69 6f 6e 2d 6e 6f | 2d 63 6f 64 69 6e 67 2d |egion-no|-coding-|
|00001db0| 73 79 73 74 65 6d 20 6b | 69 6c 6c 2d 62 75 66 66 |system k|ill-buff|
|00001dc0| 65 72 5d 20 31 30 5d 5d | 20 32 29 0a 23 40 34 34 |er] 10]]| 2).#@44|
|00001dd0| 20 4d 61 79 62 65 20 65 | 76 61 6c 75 61 74 65 20 | Maybe e|valuate |
|00001de0| 61 20 62 75 66 66 65 72 | 20 6f 66 20 65 6d 61 63 |a buffer| of emac|
|00001df0| 73 20 6c 69 73 70 20 63 | 6f 64 65 1f 0a 28 64 65 |s lisp c|ode..(de|
|00001e00| 66 61 6c 69 61 73 20 27 | 6d 6d 2d 6d 61 79 62 65 |falias '|mm-maybe|
|00001e10| 2d 65 76 61 6c 20 23 5b | 6e 69 6c 20 22 c0 c1 21 |-eval #[|nil "..!|
|00001e20| ab 84 c2 70 21 87 c3 20 | 87 22 20 5b 79 65 73 2d |...p!.. |." [yes-|
|00001e30| 6f 72 2d 6e 6f 2d 70 20 | 22 54 68 69 73 20 69 73 |or-no-p |"This is|
|00001e40| 20 65 6d 61 63 73 2d 6c | 69 73 70 20 63 6f 64 65 | emacs-l|isp code|
|00001e50| 2c 20 65 76 61 6c 75 61 | 74 65 20 69 74 3f 20 22 |, evalua|te it? "|
|00001e60| 20 65 76 61 6c 2d 62 75 | 66 66 65 72 20 65 6d 61 | eval-bu|ffer ema|
|00001e70| 63 73 2d 6c 69 73 70 2d | 6d 6f 64 65 5d 20 32 20 |cs-lisp-|mode] 2 |
|00001e80| 28 23 24 20 2e 20 37 36 | 33 33 29 5d 29 0a 28 64 |(#$ . 76|33)]).(d|
|00001e90| 65 66 61 6c 69 61 73 20 | 27 6d 6d 2d 76 69 65 77 |efalias |'mm-view|
|00001ea0| 65 72 2d 75 6e 65 73 63 | 61 70 65 20 23 5b 28 66 |er-unesc|ape #[(f|
|00001eb0| 6f 72 6d 61 74 20 26 6f | 70 74 69 6f 6e 61 6c 20 |ormat &o|ptional |
|00001ec0| 66 69 6c 65 6e 61 6d 65 | 20 75 72 6c 29 20 22 8a |filename| url) ".|
|00001ed0| c0 c1 21 71 88 c2 20 88 | 0b 63 88 65 62 88 c4 c5 |..!q.. .|.c.eb...|
|00001ee0| c6 c7 23 ab b7 c8 c9 21 | ca 48 1e 0b cc cd c7 89 |..#....!|.H......|
|00001ef0| 23 88 0e 0b ce 61 ab 85 | cf 63 88 aa 9c 0e 0b d0 |#....a..|.c......|
|00001f00| 61 ab 89 0e 11 ae 81 d2 | 63 88 aa 8d 0e 0b d3 61 |a.......|c......a|
|00001f10| ab 87 0e 14 ae 81 d2 63 | 88 29 aa 42 d5 20 29 87 |.......c|.).B. ).|
|00001f20| 22 20 5b 67 65 74 2d 62 | 75 66 66 65 72 2d 63 72 |" [get-b|uffer-cr|
|00001f30| 65 61 74 65 20 22 20 2a | 6d 6d 2d 70 61 72 73 65 |eate " *|mm-parse|
|00001f40| 2a 22 20 65 72 61 73 65 | 2d 62 75 66 66 65 72 20 |*" erase|-buffer |
|00001f50| 66 6f 72 6d 61 74 20 72 | 65 2d 73 65 61 72 63 68 |format r|e-search|
|00001f60| 2d 66 6f 72 77 61 72 64 | 20 22 25 5c 5c 28 2e 5c |-forward| "%\\(.\|
|00001f70| 5c 29 22 20 6e 69 6c 20 | 74 20 6d 61 74 63 68 2d |\)" nil |t match-|
|00001f80| 73 74 72 69 6e 67 20 31 | 20 30 20 65 73 63 61 70 |string 1| 0 escap|
|00001f90| 65 20 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 |e replac|e-match |
|00001fa0| 22 22 20 3f 5c 25 20 22 | 25 22 20 3f 73 20 66 69 |"" ?\% "|%" ?s fi|
|00001fb0| 6c 65 6e 61 6d 65 20 22 | 5c 22 5c 22 22 20 3f 75 |lename "|\"\"" ?u|
|00001fc0| 20 75 72 6c 20 62 75 66 | 66 65 72 2d 73 74 72 69 | url buf|fer-stri|
|00001fd0| 6e 67 5d 20 34 5d 29 0a | 28 64 65 66 61 6c 69 61 |ng] 4]).|(defalia|
|00001fe0| 73 20 27 6d 6d 2d 69 6e | 2d 61 73 73 6f 63 20 23 |s 'mm-in|-assoc #|
|00001ff0| 5b 28 65 6c 74 20 6c 69 | 73 74 29 20 22 c0 19 5c |[(elt li|st) "..\|
|00002000| 6e ab 99 09 ac 96 5c 6e | 40 40 ab 8b c3 5c 6e 40 |n.....\n|@@...\n@|
|00002010| 40 0c 5c 22 ab 83 5c 6e | 40 11 5c 6e 41 89 12 ac |@.\"..\n|@.\nA...|
|00002020| 67 09 29 87 22 20 5b 6e | 69 6c 20 72 73 6c 74 20 |g.)." [n|il rslt |
|00002030| 6c 69 73 74 20 73 74 72 | 69 6e 67 2d 6d 61 74 63 |list str|ing-matc|
|00002040| 68 20 65 6c 74 5d 20 34 | 5d 29 0a 28 64 65 66 61 |h elt] 4|]).(defa|
|00002050| 6c 69 61 73 20 27 6d 6d | 2d 72 65 70 6c 61 63 65 |lias 'mm|-replace|
|00002060| 2d 72 65 67 65 78 70 20 | 23 5b 28 72 65 67 65 78 |-regexp |#[(regex|
|00002070| 70 20 74 6f 2d 73 74 72 | 69 6e 67 29 20 22 65 62 |p to-str|ing) "eb|
|00002080| 88 c0 09 c2 c3 23 ad 88 | c4 0d c3 c2 23 88 aa 71 |.....#..|....#..q|
|00002090| 87 22 20 5b 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |." [re-s|earch-fo|
|000020a0| 72 77 61 72 64 20 72 65 | 67 65 78 70 20 6e 69 6c |rward re|gexp nil|
|000020b0| 20 74 20 72 65 70 6c 61 | 63 65 2d 6d 61 74 63 68 | t repla|ce-match|
|000020c0| 20 74 6f 2d 73 74 72 69 | 6e 67 5d 20 34 5d 29 0a | to-stri|ng] 4]).|
|000020d0| 28 64 65 66 61 6c 69 61 | 73 20 27 6d 6d 2d 70 61 |(defalia|s 'mm-pa|
|000020e0| 72 73 65 2d 6d 61 69 6c | 63 61 70 73 20 23 5b 28 |rse-mail|caps #[(|
|000020f0| 26 6f 70 74 69 6f 6e 61 | 6c 20 70 61 74 68 29 20 |&optiona|l path) |
|00002100| 22 08 ac 9e c1 c2 21 ab | 86 c1 c2 21 10 aa 93 0b |".....!.|...!....|
|00002110| c4 73 ab 88 c5 c6 c7 c8 | 23 10 aa 86 c5 c6 c9 ca |.s......|#.......|
|00002120| 23 10 cb cc 08 0b cd 73 | ab 83 ce aa 81 cf 5c 22 |#......s|......\"|
|00002130| 21 d0 1e 11 89 1e 12 ad | a0 0e 12 40 16 11 d3 0e |!.......|...@....|
|00002140| 11 21 ab 8c d4 0e 11 21 | ab 86 d5 0e 12 40 21 88 |.!.....!|.....@!.|
|00002150| 0e 12 41 89 16 12 ac 61 | d0 2a 87 22 20 5b 70 61 |..A....a|.*." [pa|
|00002160| 74 68 20 67 65 74 65 6e | 76 20 22 4d 41 49 4c 43 |th geten|v "MAILC|
|00002170| 41 50 53 22 20 73 79 73 | 74 65 6d 2d 74 79 70 65 |APS" sys|tem-type|
|00002180| 20 28 6d 73 2d 64 6f 73 | 20 6d 73 2d 77 69 6e 64 | (ms-dos| ms-wind|
|00002190| 6f 77 73 20 77 69 6e 64 | 6f 77 73 2d 6e 74 29 20 |ows wind|ows-nt) |
|000021a0| 6d 61 70 63 6f 6e 63 61 | 74 20 65 78 70 61 6e 64 |mapconca|t expand|
|000021b0| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 28 22 7e 2f 6d |-file-na|me ("~/m|
|000021c0| 61 69 6c 2e 63 61 70 22 | 20 22 7e 2f 65 74 63 2f |ail.cap"| "~/etc/|
|000021d0| 6d 61 69 6c 2e 63 61 70 | 22 29 20 22 3b 22 20 28 |mail.cap|") ";" (|
|000021e0| 22 7e 2f 2e 6d 61 69 6c | 63 61 70 22 20 22 2f 65 |"~/.mail|cap" "/e|
|000021f0| 74 63 2f 6d 61 69 6c 63 | 61 70 3a 2f 75 73 72 2f |tc/mailc|ap:/usr/|
|00002200| 65 74 63 2f 6d 61 69 6c | 63 61 70 22 20 22 2f 75 |etc/mail|cap" "/u|
|00002210| 73 72 2f 6c 6f 63 61 6c | 2f 65 74 63 2f 6d 61 69 |sr/local|/etc/mai|
|00002220| 6c 63 61 70 22 29 20 22 | 3a 22 20 72 65 76 65 72 |lcap") "|:" rever|
|00002230| 73 65 20 6d 6d 2d 73 74 | 72 69 6e 67 2d 74 6f 2d |se mm-st|ring-to-|
|00002240| 74 6f 6b 65 6e 73 20 28 | 6d 73 2d 64 6f 73 20 6d |tokens (|ms-dos m|
|00002250| 73 2d 77 69 6e 64 6f 77 | 73 20 77 69 6e 64 6f 77 |s-window|s window|
|00002260| 73 2d 6e 74 29 20 3f 5c | 3b 20 3f 5c 3a 20 6e 69 |s-nt) ?\|; ?\: ni|
|00002270| 6c 20 66 6e 61 6d 65 20 | 66 6e 61 6d 65 73 20 66 |l fname |fnames f|
|00002280| 69 6c 65 2d 65 78 69 73 | 74 73 2d 70 20 66 69 6c |ile-exis|ts-p fil|
|00002290| 65 2d 72 65 61 64 61 62 | 6c 65 2d 70 20 6d 6d 2d |e-readab|le-p mm-|
|000022a0| 70 61 72 73 65 2d 6d 61 | 69 6c 63 61 70 5d 20 36 |parse-ma|ilcap] 6|
|000022b0| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 6d 6d |]).(defa|lias 'mm|
|000022c0| 2d 70 61 72 73 65 2d 6d | 61 69 6c 63 61 70 20 23 |-parse-m|ailcap #|
|000022d0| 5b 28 66 6e 61 6d 65 29 | 20 22 c0 89 89 89 89 19 |[(fname)| "......|
|000022e0| 1a 1b 1c 1d 8a c6 c7 21 | 71 88 c8 20 88 c9 0e 5c |.......!|q.. ...\|
|000022f0| 6e 21 88 cb 0e 0c 21 88 | cd ce cf 5c 22 88 cd d0 |n!....!.|...\"...|
|00002300| d1 5c 22 88 cd d2 d3 5c | 22 88 cd d4 d5 21 d6 50 |.\"....\|"....!.P|
|00002310| cf 5c 22 88 64 62 88 d7 | c0 78 88 60 64 7c 88 65 |.\".db..|.x.`d|.e|
|00002320| 62 88 6d 3f 85 dc 00 d7 | c0 77 88 60 13 c0 11 d8 |b.m?....|.w.`....|
|00002330| c0 77 88 d9 0b 60 5c 22 | 88 0b 60 7b 15 da c0 77 |.w...`\"|..`{...w|
|00002340| 88 60 13 db c0 77 88 d9 | 0b 60 5c 22 88 0b 66 ae |.`...w..|.`\"..f.|
|00002350| 81 dc dd 55 ab 83 de aa | 8b 60 0b 55 ab 83 de aa |...U....|.`.U....|
|00002360| 83 0b 60 7b 14 df c0 77 | 88 df c0 77 88 60 13 e0 |..`{...w|...w.`..|
|00002370| c0 77 88 0b 66 ae 81 dc | e1 55 ab 93 0b 54 60 7d |.w..f...|.U...T`}|
|00002380| 88 65 62 88 e2 70 21 64 | 62 88 7e 88 12 aa 84 0b |.eb..p!d|b.~.....|
|00002390| 60 7b 12 60 13 c0 7f 88 | e3 5c 6e 42 e4 0d e5 0c |`{.`....|.\nB....|
|000023a0| de 98 ab 83 e6 aa 81 0c | 51 42 44 e7 0b 60 5c 22 |........|QBD..`\"|
|000023b0| a4 11 e8 09 21 88 e9 0d | 0c 09 23 88 82 43 00 2e |....!...|..#..C..|
|000023c0| 06 87 22 20 5b 6e 69 6c | 20 69 6e 66 6f 20 76 69 |.." [nil| info vi|
|000023d0| 65 77 65 72 20 73 61 76 | 65 2d 70 6f 73 20 6d 69 |ewer sav|e-pos mi|
|000023e0| 6e 6f 72 20 6d 61 6a 6f | 72 20 67 65 74 2d 62 75 |nor majo|r get-bu|
|000023f0| 66 66 65 72 2d 63 72 65 | 61 74 65 20 22 20 2a 6d |ffer-cre|ate " *m|
|00002400| 61 69 6c 63 61 70 2a 22 | 20 65 72 61 73 65 2d 62 |ailcap*"| erase-b|
|00002410| 75 66 66 65 72 20 69 6e | 73 65 72 74 2d 66 69 6c |uffer in|sert-fil|
|00002420| 65 2d 63 6f 6e 74 65 6e | 74 73 20 66 6e 61 6d 65 |e-conten|ts fname|
|00002430| 20 73 65 74 2d 73 79 6e | 74 61 78 2d 74 61 62 6c | set-syn|tax-tabl|
|00002440| 65 20 6d 6d 2d 70 61 72 | 73 65 2d 61 72 67 73 2d |e mm-par|se-args-|
|00002450| 73 79 6e 74 61 78 2d 74 | 61 62 6c 65 20 6d 6d 2d |syntax-t|able mm-|
|00002460| 72 65 70 6c 61 63 65 2d | 72 65 67 65 78 70 20 22 |replace-|regexp "|
|00002470| 23 2e 2a 22 20 22 22 20 | 22 5c 6e 2b 22 20 22 5c |#.*" "" |"\n+" "\|
|00002480| 6e 22 20 22 5c 5c 5c 5c | 5b 20 09 5c 6e 5d 2b 22 |n" "\\\\|[ .\n]+"|
|00002490| 20 22 20 22 20 72 65 67 | 65 78 70 2d 71 75 6f 74 | " " reg|exp-quot|
|000024a0| 65 20 22 5c 5c 22 20 22 | 5b 20 09 5d 2a 5c 6e 22 |e "\\" "|[ .]*\n"|
|000024b0| 20 22 20 09 5c 6e 22 20 | 22 5e 2f 3b 22 20 64 6f | " .\n" |"^/;" do|
|000024c0| 77 6e 63 61 73 65 2d 72 | 65 67 69 6f 6e 20 22 2f |wncase-r|egion "/|
|000024d0| 20 09 5c 6e 22 20 22 5e | 3b 22 20 30 20 3f 5c 2a | .\n" "^|;" 0 ?\*|
|000024e0| 20 22 2e 2a 22 20 22 3b | 20 09 5c 6e 22 20 22 5e | ".*" ";| .\n" "^|
|000024f0| 3b 5c 6e 22 20 3f 5c 27 | 20 72 65 61 64 20 22 76 |;\n" ?\'| read "v|
|00002500| 69 65 77 65 72 22 20 22 | 74 79 70 65 22 20 22 2f |iewer" "|type" "/|
|00002510| 22 20 22 2a 22 20 6d 6d | 2d 70 61 72 73 65 2d 6d |" "*" mm|-parse-m|
|00002520| 61 69 6c 63 61 70 2d 65 | 78 74 72 61 73 20 6d 6d |ailcap-e|xtras mm|
|00002530| 2d 6d 61 69 6c 63 61 70 | 2d 65 6e 74 72 79 2d 70 |-mailcap|-entry-p|
|00002540| 61 73 73 65 73 2d 74 65 | 73 74 20 6d 6d 2d 61 64 |asses-te|st mm-ad|
|00002550| 64 2d 6d 61 69 6c 63 61 | 70 2d 65 6e 74 72 79 5d |d-mailca|p-entry]|
|00002560| 20 36 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 6]).(de|falias '|
|00002570| 6d 6d 2d 70 61 72 73 65 | 2d 6d 61 69 6c 63 61 70 |mm-parse|-mailcap|
|00002580| 2d 65 78 74 72 61 73 20 | 23 5b 28 73 74 20 6e 64 |-extras |#[(st nd|
|00002590| 29 20 22 c0 89 89 89 89 | 89 19 1a 1b 1c 1d 1e 06 |) ".....|........|
|000025a0| 8c 0e 07 0e 08 7d 88 65 | 62 88 c9 c0 77 88 6d ac |.....}.e|b...w.m.|
|000025b0| ee c0 11 ca c0 77 88 60 | 13 cb c0 77 88 cc 0b 60 |.....w.`|...w...`|
|000025c0| 5c 22 88 0b 60 7b 16 06 | cd c0 77 88 60 66 ae 81 |\"..`{..|..w.`f..|
|000025d0| ce cf 55 ac 84 c0 15 aa | be d0 c0 77 88 60 89 12 |..U.....|...w.`..|
|000025e0| 66 d1 73 ab 8a 5c 6e 54 | 12 c0 d2 d3 8f 88 aa a4 |f.s..\nT|........|
|000025f0| 09 ac a1 d4 c0 77 88 60 | 53 66 ae 81 ce d5 55 ab |.....w.`|Sf....U.|
|00002600| 8e d6 60 53 60 d5 d7 24 | 88 d8 c0 77 88 aa 61 d9 |..`S`..$|...w..a.|
|00002610| 89 11 ab 5f 5c 6e 60 7b | 15 0e 06 0d 42 0c 42 14 |..._\n`{|....B.B.|
|00002620| aa 0f 0c 2e 07 87 22 20 | 5b 6e 69 6c 20 64 6f 6e |......" |[nil don|
|00002630| 65 20 76 61 6c 2d 70 6f | 73 20 6e 61 6d 65 2d 70 |e val-po|s name-p|
|00002640| 6f 73 20 72 65 73 75 6c | 74 73 20 76 61 6c 75 65 |os resul|ts value|
|00002650| 20 6e 61 6d 65 20 73 74 | 20 6e 64 20 22 20 5c 6e | name st| nd " \n|
|00002660| 09 3b 22 20 22 20 5c 22 | 3b 5c 6e 09 22 20 22 5e |.;" " \"|;\n." "^|
|00002670| 20 5c 6e 09 3d 22 20 64 | 6f 77 6e 63 61 73 65 2d | \n.=" d|owncase-|
|00002680| 72 65 67 69 6f 6e 20 22 | 20 09 5c 6e 22 20 30 20 |region "| .\n" 0 |
|00002690| 3f 5c 3d 20 22 20 09 5c | 6e 3d 22 20 28 3f 5c 22 |?\= " .\|n=" (?\"|
|000026a0| 20 3f 5c 27 29 20 28 62 | 79 74 65 2d 63 6f 64 65 | ?\') (b|yte-code|
|000026b0| 20 22 c0 c1 21 88 c2 c1 | 21 87 22 20 5b 66 6f 72 | "..!...|!." [for|
|000026c0| 77 61 72 64 2d 73 65 78 | 70 20 31 20 62 61 63 6b |ward-sex|p 1 back|
|000026d0| 77 61 72 64 2d 63 68 61 | 72 5d 20 32 29 20 28 28 |ward-cha|r] 2) ((|
|000026e0| 65 72 72 6f 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |error (b|yte-code|
|000026f0| 20 22 64 62 87 22 20 5b | 5d 20 31 29 29 29 20 22 | "db." [|] 1))) "|
|00002700| 5e 3b 22 20 3f 5c 5c 20 | 73 75 62 73 74 2d 63 68 |^;" ?\\ |subst-ch|
|00002710| 61 72 2d 69 6e 2d 72 65 | 67 69 6f 6e 20 3f 5c 20 |ar-in-re|gion ?\ |
|00002720| 20 22 3b 22 20 74 5d 20 | 37 5d 29 0a 23 40 34 34 | ";" t] |7]).#@44|
|00002730| 20 52 65 74 75 72 6e 20 | 61 20 6c 69 73 74 20 6f | Return |a list o|
|00002740| 66 20 77 6f 72 64 73 20 | 66 72 6f 6d 20 74 68 65 |f words |from the|
|00002750| 20 73 74 72 69 6e 67 20 | 53 54 52 1f 0a 28 64 65 | string |STR..(de|
|00002760| 66 61 6c 69 61 73 20 27 | 6d 6d 2d 73 74 72 69 6e |falias '|mm-strin|
|00002770| 67 2d 74 6f 2d 74 6f 6b | 65 6e 73 20 23 5b 28 73 |g-to-tok|ens #[(s|
|00002780| 74 72 20 26 6f 70 74 69 | 6f 6e 61 6c 20 64 65 6c |tr &opti|onal del|
|00002790| 69 6d 29 20 22 08 ae 81 | c1 10 c2 89 1b 1c c5 c6 |im) "...|........|
|000027a0| 0e 07 5c 22 88 0b 0c 42 | 9f 2a 87 22 20 5b 64 65 |..\"...B|.*." [de|
|000027b0| 6c 69 6d 20 3f 5c 20 20 | 6e 69 6c 20 79 20 72 65 |lim ?\  |nil y re|
|000027c0| 73 75 6c 74 73 20 6d 61 | 70 63 61 72 20 23 5b 28 |sults ma|pcar #[(|
|000027d0| 78 29 20 22 08 09 55 ab | 8b 5c 6e ab 88 5c 6e 0b |x) "..U.|.\n..\n.|
|000027e0| 42 13 c4 89 12 87 08 09 | 55 ac 88 5c 6e c5 08 21 |B.......|U..\n..!|
|000027f0| 50 89 12 87 c4 87 22 20 | 5b 78 20 64 65 6c 69 6d |P....." |[x delim|
|00002800| 20 79 20 72 65 73 75 6c | 74 73 20 6e 69 6c 20 63 | y resul|ts nil c|
|00002810| 68 61 72 2d 74 6f 2d 73 | 74 72 69 6e 67 5d 20 33 |har-to-s|tring] 3|
|00002820| 5d 20 73 74 72 5d 20 33 | 20 28 23 24 20 2e 20 31 |] str] 3| (#$ . 1|
|00002830| 30 30 33 33 29 5d 29 0a | 28 64 65 66 61 6c 69 61 |0033)]).|(defalia|
|00002840| 73 20 27 6d 6d 2d 6d 61 | 69 6c 63 61 70 2d 65 6e |s 'mm-ma|ilcap-en|
|00002850| 74 72 79 2d 70 61 73 73 | 65 73 2d 74 65 73 74 20 |try-pass|es-test |
|00002860| 23 5b 28 69 6e 66 6f 29 | 20 22 c0 c1 c2 0b 5c 22 |#[(info)| "....\"|
|00002870| 1c 1d 0c ad 84 c6 0c 41 | 21 15 c1 c7 0b 5c 22 ab |.......A|!....\".|
|00002880| 89 c8 c9 21 ac 84 c0 15 | aa c7 0d 40 c2 6b ab 9e |...!....|...@.k..|
|00002890| 0d 41 40 ca 6b ab 97 cb | 0d 38 cc 6b ac 87 cb 0d |.A@.k...|.8.k....|
|000028a0| 38 cd 6b ab 89 c8 c9 21 | ad 81 ce 15 aa a3 0d 40 |8.k....!|.......@|
|000028b0| c2 6b ab 9d 0d 41 40 cf | 6b ab 96 cb 0d 38 cc 6b |.k...A@.|k....8.k|
|000028c0| ac 87 cb 0d 38 cd 6b ab | 88 c8 c9 21 3f ad 81 ce |....8.k.|...!?...|
|000028d0| 15 0c ad 87 0c 3c ad 83 | 0c 0d a1 2a 87 22 20 5b |.....<..|...*." [|
|000028e0| 6e 69 6c 20 61 73 73 6f | 63 20 22 74 65 73 74 22 |nil asso|c "test"|
|000028f0| 20 69 6e 66 6f 20 74 65 | 73 74 20 73 74 61 74 75 | info te|st statu|
|00002900| 73 20 6d 6d 2d 73 74 72 | 69 6e 67 2d 74 6f 2d 74 |s mm-str|ing-to-t|
|00002910| 6f 6b 65 6e 73 20 22 6e | 65 65 64 73 78 31 31 22 |okens "n|eedsx11"|
|00002920| 20 67 65 74 65 6e 76 20 | 22 44 49 53 50 4c 41 59 | getenv |"DISPLAY|
|00002930| 22 20 22 2d 6e 22 20 32 | 20 22 24 44 49 53 50 4c |" "-n" 2| "$DISPL|
|00002940| 41 59 22 20 22 5c 22 24 | 44 49 53 50 4c 41 59 5c |AY" "\"$|DISPLAY\|
|00002950| 22 22 20 74 20 22 2d 7a | 22 5d 20 34 5d 29 0a 28 |"" t "-z|"] 4]).(|
|00002960| 64 65 66 61 6c 69 61 73 | 20 27 6d 6d 2d 70 61 72 |defalias| 'mm-par|
|00002970| 73 65 2d 61 72 67 73 20 | 23 5b 28 73 74 20 26 6f |se-args |#[(st &o|
|00002980| 70 74 69 6f 6e 61 6c 20 | 6e 64 20 6e 6f 64 6f 77 |ptional |nd nodow|
|00002990| 6e 63 61 73 65 29 20 22 | c0 89 89 89 89 19 1a 1b |ncase) "|........|
|000029a0| 1c 1d 8a 0e 06 3b ab 99 | c7 c8 21 71 88 c9 0e 5c |.....;..|..!q...\|
|000029b0| 6e 21 88 cb 20 88 0e 06 | 63 88 65 16 06 64 16 0c |n!.. ...|c.e..d..|
|000029c0| aa 85 c9 0e 5c 6e 21 88 | 8c 0e 06 0e 0c 7d 88 65 |....\n!.|.....}.e|
|000029d0| 62 88 6d ac e1 cd c0 77 | 88 60 12 ce c0 77 88 0e |b.m....w|.`...w..|
|000029e0| 0f ac 85 d0 5c 6e 60 5c | 22 88 5c 6e 60 7b 15 d1 |....\n`\|".\n`{..|
|000029f0| c0 77 88 60 66 ae 81 d2 | d3 55 ac 84 c0 14 aa ad |.w.`f...|.U......|
|00002a00| d4 c0 77 88 60 89 11 66 | ae 81 d2 d5 55 ac 89 09 |..w.`..f|....U...|
|00002a10| 66 ae 81 d2 d6 55 ab 89 | 09 54 c0 d7 d8 8f 7b aa |f....U..|.T....{.|
|00002a20| 8b 09 d9 c0 77 88 da c0 | 78 88 60 7b 14 0d 0c 42 |....w...|x.`{...B|
|00002a30| 0b 42 13 cd c0 77 88 aa | 1c 0b 2e 07 87 22 20 5b |.B...w..|....." [|
|00002a40| 6e 69 6c 20 76 61 6c 2d | 70 6f 73 20 6e 61 6d 65 |nil val-|pos name|
|00002a50| 2d 70 6f 73 20 72 65 73 | 75 6c 74 73 20 76 61 6c |-pos res|ults val|
|00002a60| 75 65 20 6e 61 6d 65 20 | 73 74 20 67 65 74 2d 62 |ue name |st get-b|
|00002a70| 75 66 66 65 72 2d 63 72 | 65 61 74 65 20 22 20 2a |uffer-cr|eate " *|
|00002a80| 6d 6d 2d 74 65 6d 70 2a | 22 20 73 65 74 2d 73 79 |mm-temp*|" set-sy|
|00002a90| 6e 74 61 78 2d 74 61 62 | 6c 65 20 6d 6d 2d 70 61 |ntax-tab|le mm-pa|
|00002aa0| 72 73 65 2d 61 72 67 73 | 2d 73 79 6e 74 61 78 2d |rse-args|-syntax-|
|00002ab0| 74 61 62 6c 65 20 65 72 | 61 73 65 2d 62 75 66 66 |table er|ase-buff|
|00002ac0| 65 72 20 6e 64 20 22 3b | 20 5c 6e 09 22 20 22 5e |er nd ";| \n." "^|
|00002ad0| 20 5c 6e 09 3d 3b 22 20 | 6e 6f 64 6f 77 6e 63 61 | \n.=;" |nodownca|
|00002ae0| 73 65 20 64 6f 77 6e 63 | 61 73 65 2d 72 65 67 69 |se downc|ase-regi|
|00002af0| 6f 6e 20 22 20 09 5c 6e | 22 20 30 20 3f 5c 3d 20 |on " .\n|" 0 ?\= |
|00002b00| 22 20 09 5c 6e 3d 22 20 | 3f 5c 22 20 3f 5c 27 20 |" .\n=" |?\" ?\' |
|00002b10| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 21 88 |(byte-co|de "..!.|
|00002b20| 60 53 c2 c3 77 88 87 22 | 20 5b 66 6f 72 77 61 72 |`S..w.."| [forwar|
|00002b30| 64 2d 73 65 78 70 20 31 | 20 22 5c 22 22 20 6e 69 |d-sexp 1| "\"" ni|
|00002b40| 6c 5d 20 33 29 20 28 28 | 65 72 72 6f 72 20 28 62 |l] 3) ((|error (b|
|00002b50| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 77 88 60 87 |yte-code| "..w.`.|
|00002b60| 22 20 5b 22 5e 20 09 5c | 6e 22 20 6e 69 6c 5d 20 |" ["^ .\|n" nil] |
|00002b70| 32 29 29 29 20 22 5e 3b | 22 20 22 20 09 22 5d 20 |2))) "^;|" " ."] |
|00002b80| 36 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6d |6]).(def|alias 'm|
|00002b90| 6d 2d 70 6f 73 73 69 62 | 6c 65 2d 76 69 65 77 65 |m-possib|le-viewe|
|00002ba0| 72 73 20 23 5b 28 6d 61 | 6a 6f 72 20 6d 69 6e 6f |rs #[(ma|jor mino|
|00002bb0| 72 29 20 22 c0 89 19 1a | 0b ab a3 0b 40 40 0c 6b |r) "....|....@@.k|
|00002bc0| ab 88 0b 40 41 5c 6e 42 | 12 aa 8e c5 0b 40 40 0c |...@A\nB|.....@@.|
|00002bd0| 5c 22 ab 86 0b 40 41 09 | 42 11 0b 41 89 13 ac 5d |\"...@A.|B..A...]|
|00002be0| 5c 6e 9f 09 9f a4 2a 87 | 22 20 5b 6e 69 6c 20 77 |\n....*.|" [nil w|
|00002bf0| 69 6c 64 63 61 72 64 20 | 65 78 61 63 74 20 6d 61 |ildcard |exact ma|
|00002c00| 6a 6f 72 20 6d 69 6e 6f | 72 20 73 74 72 69 6e 67 |jor mino|r string|
|00002c10| 2d 6d 61 74 63 68 5d 20 | 34 5d 29 0a 28 64 65 66 |-match] |4]).(def|
|00002c20| 61 6c 69 61 73 20 27 6d | 6d 2d 75 6e 65 73 63 61 |alias 'm|m-unesca|
|00002c30| 70 65 2d 6d 69 6d 65 2d | 74 65 73 74 20 23 5b 28 |pe-mime-|test #[(|
|00002c40| 74 65 73 74 20 74 79 70 | 65 2d 69 6e 66 6f 29 20 |test typ|e-info) |
|00002c50| 22 c0 c1 21 c2 89 89 1b | 1c 1d 1e 06 0e 07 39 ab |"..!....|......9.|
|00002c60| 85 0e 07 82 fd 00 0e 07 | 3c ab 8b 0e 07 40 39 ab |........|<....@9.|
|00002c70| 85 0e 07 82 fd 00 0e 07 | 3b ac 99 0e 07 3c 83 f8 |........|;....<..|
|00002c80| 00 0e 07 40 3b 83 f8 00 | c8 c9 0e 07 ca 23 89 16 |...@;...|.....#..|
|00002c90| 07 83 f8 00 8a 0e 06 71 | 88 cb 20 88 0e 07 63 88 |.......q|.. ...c.|
|00002ca0| 65 62 88 6d 84 f3 00 cc | c2 77 88 60 cd c2 78 88 |eb.m....|.w.`..x.|
|00002cb0| 60 5a ce 55 ac 8a cf d0 | 21 88 d1 c2 77 88 aa 63 |`Z.U....|!...w..c|
|00002cc0| 60 15 d2 c2 77 88 60 66 | 89 14 ab 57 0c d3 55 ab |`...w.`f|...W..U.|
|00002cd0| 94 0d d0 75 88 60 7c 88 | d4 d5 0e 16 5c 22 41 ae |...u.`|.|....\"A.|
|00002ce0| 81 d7 63 88 aa 3e 0c d8 | 55 ab 8c 0d d0 75 88 60 |..c..>..|U....u.`|
|00002cf0| 7c 88 d7 63 88 aa 2d 0c | d9 55 ab 8c 0d d0 75 88 ||..c..-.|.U....u.|
|00002d00| 60 7c 88 d7 63 88 aa 1c | 0c da 55 ab 8c 0d d0 75 |`|..c...|..U....u|
|00002d10| 88 60 7c 88 d7 63 88 aa | 0b 0c db 55 ab 06 d0 75 |.`|..c..|...U...u|
|00002d20| 88 dc c2 77 88 dd 0d de | 5c 5c 60 5c 22 88 0d de |...w....|\\`\"...|
|00002d30| 5c 5c 60 7b 13 0d 60 54 | 7c 88 d4 0b 0e 16 5c 22 |\\`{..`T||.....\"|
|00002d40| 41 ae 81 d7 63 88 82 52 | 00 df 20 29 aa 85 e0 e1 |A...c..R|.. )....|
|00002d50| 0e 07 5c 22 2c 87 22 20 | 5b 67 65 74 2d 62 75 66 |..\",." |[get-buf|
|00002d60| 66 65 72 2d 63 72 65 61 | 74 65 20 22 20 2a 75 6e |fer-crea|te " *un|
|00002d70| 65 73 63 61 70 65 2a 22 | 20 6e 69 6c 20 73 75 62 |escape*"| nil sub|
|00002d80| 73 74 20 73 61 76 65 2d | 63 68 72 20 73 61 76 65 |st save-|chr save|
|00002d90| 2d 70 6f 73 20 62 75 66 | 66 20 74 65 73 74 20 6d |-pos buf|f test m|
|00002da0| 61 70 63 6f 6e 63 61 74 | 20 69 64 65 6e 74 69 74 |apconcat| identit|
|00002db0| 79 20 22 20 22 20 65 72 | 61 73 65 2d 62 75 66 66 |y " " er|ase-buff|
|00002dc0| 65 72 20 22 5e 25 22 20 | 22 5c 5c 5c 5c 22 20 30 |er "^%" |"\\\\" 0|
|00002dd0| 20 64 65 6c 65 74 65 2d | 63 68 61 72 20 31 20 22 | delete-|char 1 "|
|00002de0| 25 2e 22 20 22 25 22 20 | 3f 74 20 61 73 73 6f 63 |%." "%" |?t assoc|
|00002df0| 20 22 74 79 70 65 22 20 | 74 79 70 65 2d 69 6e 66 | "type" |type-inf|
|00002e00| 6f 20 22 5c 22 5c 22 22 | 20 3f 4d 20 3f 6e 20 3f |o "\"\""| ?M ?n ?|
|00002e10| 46 20 3f 5c 7b 20 22 5e | 7d 22 20 64 6f 77 6e 63 |F ?\{ "^|}" downc|
|00002e20| 61 73 65 2d 72 65 67 69 | 6f 6e 20 32 20 62 75 66 |ase-regi|on 2 buf|
|00002e30| 66 65 72 2d 73 74 72 69 | 6e 67 20 65 72 72 6f 72 |fer-stri|ng error|
|00002e40| 20 22 42 61 64 20 76 61 | 6c 75 65 20 74 6f 20 6d | "Bad va|lue to m|
|00002e50| 6d 2d 75 6e 65 73 63 61 | 70 65 2d 6d 69 6d 65 2d |m-unesca|pe-mime-|
|00002e60| 74 65 73 74 2e 20 25 73 | 22 5d 20 35 5d 29 0a 28 |test. %s|"] 5]).(|
|00002e70| 64 65 66 61 6c 69 61 73 | 20 27 6d 6d 2d 76 69 65 |defalias| 'mm-vie|
|00002e80| 77 65 72 2d 70 61 73 73 | 65 73 2d 74 65 73 74 20 |wer-pass|es-test |
|00002e90| 23 5b 28 76 69 65 77 65 | 72 2d 69 6e 66 6f 20 74 |#[(viewe|r-info t|
|00002ea0| 79 70 65 2d 69 6e 66 6f | 29 20 22 c0 c1 5c 6e 5c |ype-info|) "..\n\|
|00002eb0| 22 89 1b 41 1c c0 c5 5c | 6e 5c 22 41 1e 06 c7 c8 |"..A...\|n\"A....|
|00002ec0| 21 1e 09 ca 1e 0b ca 1e | 0c 0b ac 83 cd aa d2 0c |!.......|........|
|00002ed0| ac 83 ca aa cc 0c cd 61 | ab 83 cd aa c4 0c 39 ab |.......a|......9.|
|00002ee0| 8b ce 0c 21 ab 86 0c 0e | 0f 21 aa b5 0c 39 ab 89 |...!....|.!...9..|
|00002ef0| d0 0c 21 ab 84 0c 4a aa | a8 0c 3c ab 8a 0c 40 39 |..!...J.|..<...@9|
|00002f00| ab 85 d1 0c 21 aa 9a d2 | 0c 0e 0f 5c 22 14 0e 13 |....!...|...\"...|
|00002f10| ca 89 89 0e 14 0c af 06 | 14 d5 d6 0c 5c 22 89 16 |........|....\"..|
|00002f20| 0b d7 55 2e 06 87 22 20 | 5b 61 73 73 6f 63 20 22 |..U..." |[assoc "|
|00002f30| 74 65 73 74 22 20 76 69 | 65 77 65 72 2d 69 6e 66 |test" vi|ewer-inf|
|00002f40| 6f 20 74 65 73 74 2d 69 | 6e 66 6f 20 74 65 73 74 |o test-i|nfo test|
|00002f50| 20 22 76 69 65 77 65 72 | 22 20 76 69 65 77 65 72 | "viewer|" viewer|
|00002f60| 20 65 78 70 61 6e 64 2d | 66 69 6c 65 2d 6e 61 6d | expand-|file-nam|
|00002f70| 65 20 22 7e 2f 22 20 64 | 65 66 61 75 6c 74 2d 64 |e "~/" d|efault-d|
|00002f80| 69 72 65 63 74 6f 72 79 | 20 6e 69 6c 20 73 74 61 |irectory| nil sta|
|00002f90| 74 75 73 20 70 61 72 73 | 65 64 2d 74 65 73 74 20 |tus pars|ed-test |
|00002fa0| 74 20 66 62 6f 75 6e 64 | 70 20 74 79 70 65 2d 69 |t fbound|p type-i|
|00002fb0| 6e 66 6f 20 62 6f 75 6e | 64 70 20 65 76 61 6c 20 |nfo boun|dp eval |
|00002fc0| 6d 6d 2d 75 6e 65 73 63 | 61 70 65 2d 6d 69 6d 65 |mm-unesc|ape-mime|
|00002fd0| 2d 74 65 73 74 20 73 68 | 65 6c 6c 2d 66 69 6c 65 |-test sh|ell-file|
|00002fe0| 2d 6e 61 6d 65 20 73 68 | 65 6c 6c 2d 63 6f 6d 6d |-name sh|ell-comm|
|00002ff0| 61 6e 64 2d 73 77 69 74 | 63 68 20 61 70 70 6c 79 |and-swit|ch apply|
|00003000| 20 63 61 6c 6c 2d 70 72 | 6f 63 65 73 73 20 30 5d | call-pr|ocess 0]|
|00003010| 20 37 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 7]).(de|falias '|
|00003020| 6d 6d 2d 61 64 64 2d 6d | 61 69 6c 63 61 70 2d 65 |mm-add-m|ailcap-e|
|00003030| 6e 74 72 79 20 23 5b 28 | 6d 61 6a 6f 72 20 6d 69 |ntry #[(|major mi|
|00003040| 6e 6f 72 20 69 6e 66 6f | 29 20 22 c0 09 5c 6e 5c |nor info|) "..\n\|
|00003050| 22 89 1b ac 8c 09 0c 0d | 42 43 42 5c 6e 42 89 12 |".......|BCB\nB..|
|00003060| aa b5 c0 0c 0b 5c 22 89 | 1e 06 ab 86 c0 c7 0d 5c |.....\".|.......\|
|00003070| 22 ab 8a 0b 0c 0d 42 0b | 41 42 a1 aa 9b c0 c7 0d |".....B.|AB......|
|00003080| 5c 22 ac 8d c0 c7 0e 06 | 5c 22 ac 86 0e 06 0d a1 |\"......|\"......|
|00003090| aa 88 0b 0c 0d 42 0b 41 | 42 a1 29 29 87 22 20 5b |.....B.A|B.))." [|
|000030a0| 61 73 73 6f 63 20 6d 61 | 6a 6f 72 20 6d 6d 2d 6d |assoc ma|jor mm-m|
|000030b0| 69 6d 65 2d 64 61 74 61 | 20 6f 6c 64 2d 6d 61 6a |ime-data| old-maj|
|000030c0| 6f 72 20 6d 69 6e 6f 72 | 20 69 6e 66 6f 20 63 75 |or minor| info cu|
|000030d0| 72 2d 6d 69 6e 6f 72 20 | 22 74 65 73 74 22 5d 20 |r-minor |"test"] |
|000030e0| 34 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6d |4]).(def|alias 'm|
|000030f0| 6d 2d 76 69 65 77 65 72 | 2d 6c 65 73 73 70 20 23 |m-viewer|-lessp #|
|00003100| 5b 28 78 20 79 29 20 22 | c0 c1 c2 c3 0c 5c 22 a3 |[(x y) "|.....\".|
|00003110| ae 81 c5 5c 22 c0 c1 c2 | c3 0e 06 5c 22 a3 ae 81 |...\"...|...\"...|
|00003120| c5 5c 22 c2 c7 0c 5c 22 | a3 ae 81 c5 3b 3f c2 c7 |.\"...\"|....;?..|
|00003130| 0e 06 5c 22 a3 ae 81 c5 | 3b 3f 1e 08 1e 09 1e 5c |..\"....|;?.....\|
|00003140| 6e 1e 0b 0e 09 ab 87 0e | 08 ac 83 cc aa 9b 0e 08 |n.......|........|
|00003150| ac 8b 0e 0b ab 87 0e 5c | 6e ac 83 cc aa 8c 0e 0b |.......\|n.......|
|00003160| ac 87 0e 5c 6e ab 83 cc | aa 81 cd 2c 87 22 20 5b |...\n...|...,." [|
|00003170| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 5b 2a |string-m|atch "[*|
|00003180| 3f 5d 22 20 61 73 73 6f | 63 20 22 74 79 70 65 22 |?]" asso|c "type"|
|00003190| 20 78 20 22 22 20 79 20 | 22 76 69 65 77 65 72 22 | x "" y |"viewer"|
|000031a0| 20 79 2d 6c 69 73 70 20 | 78 2d 6c 69 73 70 20 79 | y-lisp |x-lisp y|
|000031b0| 2d 77 69 6c 64 20 78 2d | 77 69 6c 64 20 74 20 6e |-wild x-|wild t n|
|000031c0| 69 6c 5d 20 36 5d 29 0a | 23 40 35 37 38 20 47 65 |il] 6]).|#@578 Ge|
|000031d0| 74 20 74 68 65 20 6d 69 | 6d 65 20 76 69 65 77 65 |t the mi|me viewe|
|000031e0| 72 20 63 6f 6d 6d 61 6e | 64 20 66 6f 72 20 48 45 |r comman|d for HE|
|000031f0| 41 44 45 52 4c 49 4e 45 | 2c 20 72 65 74 75 72 6e |ADERLINE|, return|
|00003200| 20 6e 69 6c 20 69 66 20 | 6e 6f 6e 65 20 66 6f 75 | nil if |none fou|
|00003210| 6e 64 2e 0a 45 78 70 65 | 63 74 73 20 61 20 63 6f |nd..Expe|cts a co|
|00003220| 6d 70 6c 65 74 65 20 63 | 6f 6e 74 65 6e 74 2d 74 |mplete c|ontent-t|
|00003230| 79 70 65 20 68 65 61 64 | 65 72 20 6c 69 6e 65 20 |ype head|er line |
|00003240| 61 73 20 69 74 73 20 61 | 72 67 75 6d 65 6e 74 2e |as its a|rgument.|
|00003250| 20 20 54 68 69 73 20 63 | 61 6e 0a 62 65 20 73 69 |  This c|an.be si|
|00003260| 6d 70 6c 65 20 6c 69 6b | 65 20 74 65 78 74 2f 68 |mple lik|e text/h|
|00003270| 74 6d 6c 2c 20 6f 72 20 | 63 6f 6d 70 6c 65 78 20 |tml, or |complex |
|00003280| 6c 69 6b 65 20 74 65 78 | 74 2f 70 6c 61 69 6e 3b |like tex|t/plain;|
|00003290| 20 63 68 61 72 73 65 74 | 3d 62 6c 61 68 3b 20 66 | charset|=blah; f|
|000032a0| 6f 6f 3d 62 61 72 0a 0a | 54 68 69 72 64 20 61 72 |oo=bar..|Third ar|
|000032b0| 67 75 6d 65 6e 74 20 52 | 45 51 55 45 53 54 20 73 |gument R|EQUEST s|
|000032c0| 70 65 63 69 66 69 65 73 | 20 77 68 61 74 20 69 6e |pecifies| what in|
|000032d0| 66 6f 72 6d 61 74 69 6f | 6e 20 74 6f 20 72 65 74 |formatio|n to ret|
|000032e0| 75 72 6e 2e 20 20 49 66 | 20 69 74 20 69 73 0a 6e |urn.  If| it is.n|
|000032f0| 69 6c 20 6f 72 20 74 68 | 65 20 65 6d 70 74 79 20 |il or th|e empty |
|00003300| 73 74 72 69 6e 67 2c 20 | 74 68 65 20 76 69 65 77 |string, |the view|
|00003310| 65 72 20 28 73 65 63 6f | 6e 64 20 66 69 65 6c 64 |er (seco|nd field|
|00003320| 20 6f 66 20 74 68 65 20 | 6d 61 69 6c 63 61 70 0a | of the |mailcap.|
|00003330| 65 6e 74 72 79 29 20 77 | 69 6c 6c 20 62 65 20 72 |entry) w|ill be r|
|00003340| 65 74 75 72 6e 65 64 2e | 20 20 49 66 20 69 74 20 |eturned.|  If it |
|00003350| 69 73 20 61 20 73 74 72 | 69 6e 67 2c 20 74 68 65 |is a str|ing, the|
|00003360| 6e 20 74 68 65 20 6d 61 | 69 6c 63 61 70 20 66 69 |n the ma|ilcap fi|
|00003370| 65 6c 64 0a 63 6f 72 72 | 65 73 70 6f 6e 64 69 6e |eld.corr|espondin|
|00003380| 67 20 74 6f 20 74 68 61 | 74 20 73 74 72 69 6e 67 |g to tha|t string|
|00003390| 20 77 69 6c 6c 20 62 65 | 20 72 65 74 75 72 6e 65 | will be| returne|
|000033a0| 64 20 28 70 72 69 6e 74 | 2c 20 64 65 73 63 72 69 |d (print|, descri|
|000033b0| 70 74 69 6f 6e 2c 0a 77 | 68 61 74 65 76 65 72 29 |ption,.w|hatever)|
|000033c0| 2e 20 20 49 66 20 61 20 | 6e 75 6d 62 65 72 2c 20 |.  If a |number, |
|000033d0| 74 68 65 6e 20 61 6c 6c | 20 74 68 65 20 69 6e 66 |then all| the inf|
|000033e0| 6f 72 6d 61 74 69 6f 6e | 20 66 6f 72 20 74 68 69 |ormation| for thi|
|000033f0| 73 20 73 70 65 63 69 66 | 69 63 0a 76 69 65 77 65 |s specif|ic.viewe|
|00003400| 72 20 69 73 20 72 65 74 | 75 72 6e 65 64 2e 1f 0a |r is ret|urned...|
|00003410| 28 64 65 66 61 6c 69 61 | 73 20 27 6d 6d 2d 6d 69 |(defalia|s 'mm-mi|
|00003420| 6d 65 2d 69 6e 66 6f 20 | 23 5b 28 73 74 20 26 6f |me-info |#[(st &o|
|00003430| 70 74 69 6f 6e 61 6c 20 | 6e 64 20 72 65 71 75 65 |ptional |nd reque|
|00003440| 73 74 29 20 22 c0 89 89 | 89 89 89 89 89 89 89 19 |st) "...|........|
|00003450| 1a 1b 1c 1d 1e 06 1e 07 | 1e 08 1e 09 1e 5c 6e 8a |........|.....\n.|
|00003460| 0e 0b ac 90 cc cd 21 71 | 88 ce 20 88 cf 63 88 65 |......!q|.. ..c.e|
|00003470| 16 0b aa ad 0e 0b 3b ab | 91 cc cd 21 71 88 ce 20 |......;.|...!q.. |
|00003480| 88 0e 0b 63 88 65 16 0b | aa 97 0e 10 ac 8d 0e 0b |...c.e..|........|
|00003490| 89 62 88 c0 7f 88 60 7d | 88 aa 86 0e 0b 0e 10 7d |.b....`}|.......}|
|000034a0| 88 0e 0b 62 88 d1 c0 77 | 88 d2 20 88 d3 d4 8d 11 |...b...w|.. .....|
|000034b0| d5 d6 09 5c 22 41 3b ab | 86 5c 6e ab 83 5c 6e 40 |...\"A;.|.\n..\n@|
|000034c0| 11 7e 88 09 ac 8e 0e 5c | 6e d7 6b ac 88 d8 d7 c0 |.~.....\|n.k.....|
|000034d0| 0e 19 23 aa dd 0e 19 ab | 86 0e 19 da 6b ab 8b db |..#.....|....k...|
|000034e0| d5 d6 09 5c 22 41 0e 08 | 5c 22 aa c8 0e 19 3b ab |...\"A..|\"....;.|
|000034f0| 98 0e 19 dc 98 ac 86 0e | 19 d6 98 ad b7 db d5 0e |........|........|
|00003500| 19 09 5c 22 a3 0e 08 5c | 22 aa ab dd 09 21 11 d5 |..\"...\|"....!..|
|00003510| d6 09 5c 22 d5 dc 09 5c | 22 1c 89 1e 1e ab 8b 0e |..\"...\|".......|
|00003520| 1e db 0e 1e 41 0e 08 5c | 22 a1 88 0c ab 89 0c db |....A..\|".......|
|00003530| 0c 41 0e 08 5c 22 a1 88 | 2a 09 2e 0b 87 22 20 5b |.A..\"..|*...." [|
|00003540| 6e 69 6c 20 76 69 65 77 | 65 72 20 70 61 73 73 65 |nil view|er passe|
|00003550| 64 20 76 69 65 77 65 72 | 73 20 74 65 73 74 20 6d |d viewer|s test m|
|00003560| 69 6e 6f 72 2d 69 6e 66 | 6f 20 6d 61 6a 6f 72 2d |inor-inf|o major-|
|00003570| 69 6e 66 6f 20 73 61 76 | 65 2d 70 6f 73 20 69 6e |info sav|e-pos in|
|00003580| 66 6f 20 6d 69 6e 6f 72 | 20 6d 61 6a 6f 72 20 73 |fo minor| major s|
|00003590| 74 20 67 65 74 2d 62 75 | 66 66 65 72 2d 63 72 65 |t get-bu|ffer-cre|
|000035a0| 61 74 65 20 22 20 2a 6d | 69 6d 65 70 61 72 73 65 |ate " *m|imeparse|
|000035b0| 2a 22 20 65 72 61 73 65 | 2d 62 75 66 66 65 72 20 |*" erase|-buffer |
|000035c0| 22 74 65 78 74 2f 70 6c | 61 69 6e 22 20 6e 64 20 |"text/pl|ain" nd |
|000035d0| 22 3a 20 09 5c 6e 22 20 | 62 75 66 66 65 72 2d 65 |": .\n" |buffer-e|
|000035e0| 6e 61 62 6c 65 2d 75 6e | 64 6f 20 6d 6d 2d 65 78 |nable-un|do mm-ex|
|000035f0| 69 74 20 28 62 79 74 65 | 2d 63 6f 64 65 20 22 60 |it (byte|-code "`|
|00003600| 10 c1 c2 77 88 c3 08 60 | 5c 22 88 08 60 7b 14 c5 |...w...`|\"..`{..|
|00003610| 0c 0e 06 5c 22 41 89 16 | 07 ac 85 c8 c9 c2 5c 22 |...\"A..|......\"|
|00003620| 88 ca c2 77 88 60 10 cb | c2 77 88 c3 08 60 5c 22 |...w.`..|.w...`\"|
|00003630| 88 08 60 7b 16 0c cd 0e | 07 0e 0c 5c 22 89 16 0e |..`{....|...\"...|
|00003640| ac 85 c8 c9 c2 5c 22 88 | cf c2 77 88 6c ac 8b 60 |.....\".|..w.l..`|
|00003650| 10 c2 7f 88 d0 08 60 5c | 22 16 11 0e 0e ab 99 d2 |......`\|".......|
|00003660| 0e 0e 40 0e 11 5c 22 ab | 88 0e 0e 40 0e 13 42 16 |..@..\".|...@..B.|
|00003670| 13 0e 0e 41 89 16 0e ac | 67 d4 0e 13 9f d5 5c 22 |...A....|g.....\"|
|00003680| 89 16 13 40 87 22 20 5b | 73 61 76 65 2d 70 6f 73 |...@." [|save-pos|
|00003690| 20 22 5e 2f 22 20 6e 69 | 6c 20 64 6f 77 6e 63 61 | "^/" ni|l downca|
|000036a0| 73 65 2d 72 65 67 69 6f | 6e 20 6d 61 6a 6f 72 20 |se-regio|n major |
|000036b0| 61 73 73 6f 63 20 6d 6d | 2d 6d 69 6d 65 2d 64 61 |assoc mm|-mime-da|
|000036c0| 74 61 20 6d 61 6a 6f 72 | 2d 69 6e 66 6f 20 74 68 |ta major|-info th|
|000036d0| 72 6f 77 20 6d 6d 2d 65 | 78 69 74 20 22 2f 20 09 |row mm-e|xit "/ .|
|000036e0| 5c 6e 22 20 22 5e 20 09 | 5c 6e 3b 22 20 6d 69 6e |\n" "^ .|\n;" min|
|000036f0| 6f 72 20 6d 6d 2d 70 6f | 73 73 69 62 6c 65 2d 76 |or mm-po|ssible-v|
|00003700| 69 65 77 65 72 73 20 76 | 69 65 77 65 72 73 20 22 |iewers v|iewers "|
|00003710| 3b 20 09 22 20 6d 6d 2d | 70 61 72 73 65 2d 61 72 |; ." mm-|parse-ar|
|00003720| 67 73 20 69 6e 66 6f 20 | 6d 6d 2d 76 69 65 77 65 |gs info |mm-viewe|
|00003730| 72 2d 70 61 73 73 65 73 | 2d 74 65 73 74 20 70 61 |r-passes|-test pa|
|00003740| 73 73 65 64 20 73 6f 72 | 74 20 6d 6d 2d 76 69 65 |ssed sor|t mm-vie|
|00003750| 77 65 72 2d 6c 65 73 73 | 70 5d 20 34 29 20 61 73 |wer-less|p] 4) as|
|00003760| 73 6f 63 20 22 76 69 65 | 77 65 72 22 20 22 64 65 |soc "vie|wer" "de|
|00003770| 66 61 75 6c 74 22 20 6d | 6d 2d 6d 69 6d 65 2d 69 |fault" m|m-mime-i|
|00003780| 6e 66 6f 20 72 65 71 75 | 65 73 74 20 22 22 20 6d |nfo requ|est "" m|
|00003790| 6d 2d 75 6e 65 73 63 61 | 70 65 2d 6d 69 6d 65 2d |m-unesca|pe-mime-|
|000037a0| 74 65 73 74 20 22 74 65 | 73 74 22 20 6d 6d 2d 63 |test "te|st" mm-c|
|000037b0| 6f 70 79 2d 74 72 65 65 | 20 76 69 65 77 5d 20 31 |opy-tree| view] 1|
|000037c0| 31 20 28 23 24 20 2e 20 | 31 32 37 35 30 29 5d 29 |1 (#$ . |12750)])|
|000037d0| 0a 23 40 38 32 20 2a 41 | 6e 20 61 73 73 6f 63 20 |.#@82 *A|n assoc |
|000037e0| 6c 69 73 74 20 6f 66 20 | 66 69 6c 65 20 65 78 74 |list of |file ext|
|000037f0| 65 6e 73 69 6f 6e 73 20 | 61 6e 64 20 74 68 65 20 |ensions |and the |
|00003800| 4d 49 4d 45 20 63 6f 6e | 74 65 6e 74 2d 74 79 70 |MIME con|tent-typ|
|00003810| 65 73 20 74 68 65 79 0a | 63 6f 72 72 65 73 70 6f |es they.|correspo|
|00003820| 6e 64 20 74 6f 2e 1f 0a | 28 64 65 66 76 61 72 20 |nd to...|(defvar |
|00003830| 6d 6d 2d 6d 69 6d 65 2d | 65 78 74 65 6e 73 69 6f |mm-mime-|extensio|
|00003840| 6e 73 20 27 28 28 22 22 | 20 2e 20 22 74 65 78 74 |ns '((""| . "text|
|00003850| 2f 70 6c 61 69 6e 22 29 | 20 28 22 2e 61 62 73 22 |/plain")| (".abs"|
|00003860| 20 2e 20 22 61 75 64 69 | 6f 2f 78 2d 6d 70 65 67 | . "audi|o/x-mpeg|
|00003870| 22 29 20 28 22 2e 61 69 | 66 22 20 2e 20 22 61 75 |") (".ai|f" . "au|
|00003880| 64 69 6f 2f 61 69 66 66 | 22 29 20 28 22 2e 61 69 |dio/aiff|") (".ai|
|00003890| 66 63 22 20 2e 20 22 61 | 75 64 69 6f 2f 61 69 66 |fc" . "a|udio/aif|
|000038a0| 66 22 29 20 28 22 2e 61 | 69 66 66 22 20 2e 20 22 |f") (".a|iff" . "|
|000038b0| 61 75 64 69 6f 2f 61 69 | 66 66 22 29 20 28 22 2e |audio/ai|ff") (".|
|000038c0| 61 6e 6f 22 20 2e 20 22 | 61 70 70 6c 69 63 61 74 |ano" . "|applicat|
|000038d0| 69 6f 6e 2f 78 2d 61 6e | 6e 6f 74 61 74 6f 72 22 |ion/x-an|notator"|
|000038e0| 29 20 28 22 2e 61 75 22 | 20 2e 20 22 61 75 64 69 |) (".au"| . "audi|
|000038f0| 6f 2f 75 6c 61 77 22 29 | 20 28 22 2e 61 76 69 22 |o/ulaw")| (".avi"|
|00003900| 20 2e 20 22 76 69 64 65 | 6f 2f 78 2d 6d 73 76 69 | . "vide|o/x-msvi|
|00003910| 64 65 6f 22 29 20 28 22 | 2e 62 63 70 69 6f 22 20 |deo") ("|.bcpio" |
|00003920| 2e 20 22 61 70 70 6c 69 | 63 61 74 69 6f 6e 2f 78 |. "appli|cation/x|
|00003930| 2d 62 63 70 69 6f 22 29 | 20 28 22 2e 62 69 6e 22 |-bcpio")| (".bin"|
|00003940| 20 2e 20 22 61 70 70 6c | 69 63 61 74 69 6f 6e 2f | . "appl|ication/|
|00003950| 6f 63 74 65 74 2d 73 74 | 72 65 61 6d 22 29 20 28 |octet-st|ream") (|
|00003960| 22 2e 63 64 66 22 20 2e | 20 22 61 70 70 6c 69 63 |".cdf" .| "applic|
|00003970| 61 74 69 6f 6e 2f 78 2d | 6e 65 74 63 64 72 22 29 |ation/x-|netcdr")|
|00003980| 20 28 22 2e 63 70 69 6f | 22 20 2e 20 22 61 70 70 | (".cpio|" . "app|
|00003990| 6c 69 63 61 74 69 6f 6e | 2f 78 2d 63 70 69 6f 22 |lication|/x-cpio"|
|000039a0| 29 20 28 22 2e 63 73 68 | 22 20 2e 20 22 61 70 70 |) (".csh|" . "app|
|000039b0| 6c 69 63 61 74 69 6f 6e | 2f 78 2d 63 73 68 22 29 |lication|/x-csh")|
|000039c0| 20 28 22 2e 64 76 69 22 | 20 2e 20 22 61 70 70 6c | (".dvi"| . "appl|
|000039d0| 69 63 61 74 69 6f 6e 2f | 78 2d 64 76 69 22 29 20 |ication/|x-dvi") |
|000039e0| 28 22 2e 65 6c 22 20 2e | 20 22 61 70 70 6c 69 63 |(".el" .| "applic|
|000039f0| 61 74 69 6f 6e 2f 65 6d | 61 63 73 2d 6c 69 73 70 |ation/em|acs-lisp|
|00003a00| 22 29 20 28 22 2e 65 70 | 73 22 20 2e 20 22 61 70 |") (".ep|s" . "ap|
|00003a10| 70 6c 69 63 61 74 69 6f | 6e 2f 70 6f 73 74 73 63 |plicatio|n/postsc|
|00003a20| 72 69 70 74 22 29 20 28 | 22 2e 65 74 78 22 20 2e |ript") (|".etx" .|
|00003a30| 20 22 74 65 78 74 2f 78 | 2d 73 65 74 65 78 74 22 | "text/x|-setext"|
|00003a40| 29 20 28 22 2e 65 78 65 | 22 20 2e 20 22 61 70 70 |) (".exe|" . "app|
|00003a50| 6c 69 63 61 74 69 6f 6e | 2f 6f 63 74 65 74 2d 73 |lication|/octet-s|
|00003a60| 74 72 65 61 6d 22 29 20 | 28 22 2e 66 61 78 22 20 |tream") |(".fax" |
|00003a70| 2e 20 22 69 6d 61 67 65 | 2f 78 2d 66 61 78 22 29 |. "image|/x-fax")|
|00003a80| 20 28 22 2e 67 69 66 22 | 20 2e 20 22 69 6d 61 67 | (".gif"| . "imag|
|00003a90| 65 2f 67 69 66 22 29 20 | 28 22 2e 68 64 66 22 20 |e/gif") |(".hdf" |
|00003aa0| 2e 20 22 61 70 70 6c 69 | 63 61 74 69 6f 6e 2f 78 |. "appli|cation/x|
|00003ab0| 2d 68 64 66 22 29 20 28 | 22 2e 68 71 78 22 20 2e |-hdf") (|".hqx" .|
|00003ac0| 20 22 61 70 70 6c 69 63 | 61 74 69 6f 6e 2f 6d 61 | "applic|ation/ma|
|00003ad0| 63 2d 62 69 6e 68 65 78 | 34 30 22 29 20 28 22 2e |c-binhex|40") (".|
|00003ae0| 68 74 6d 22 20 2e 20 22 | 74 65 78 74 2f 68 74 6d |htm" . "|text/htm|
|00003af0| 6c 22 29 20 28 22 2e 68 | 74 6d 6c 22 20 2e 20 22 |l") (".h|tml" . "|
|00003b00| 74 65 78 74 2f 68 74 6d | 6c 22 29 20 28 22 2e 69 |text/htm|l") (".i|
|00003b10| 63 6f 6e 22 20 2e 20 22 | 69 6d 61 67 65 2f 78 2d |con" . "|image/x-|
|00003b20| 69 63 6f 6e 22 29 20 28 | 22 2e 69 65 66 22 20 2e |icon") (|".ief" .|
|00003b30| 20 22 69 6d 61 67 65 2f | 69 65 66 22 29 20 28 22 | "image/|ief") ("|
|00003b40| 2e 6a 70 67 22 20 2e 20 | 22 69 6d 61 67 65 2f 6a |.jpg" . |"image/j|
|00003b50| 70 65 67 22 29 20 28 22 | 2e 6d 61 63 70 22 20 2e |peg") ("|.macp" .|
|00003b60| 20 22 69 6d 61 67 65 2f | 78 2d 6d 61 63 70 61 69 | "image/|x-macpai|
|00003b70| 6e 74 22 29 20 28 22 2e | 6d 61 6e 22 20 2e 20 22 |nt") (".|man" . "|
|00003b80| 61 70 70 6c 69 63 61 74 | 69 6f 6e 2f 78 2d 74 72 |applicat|ion/x-tr|
|00003b90| 6f 66 66 2d 6d 61 6e 22 | 29 20 28 22 2e 6d 65 22 |off-man"|) (".me"|
|00003ba0| 20 2e 20 22 61 70 70 6c | 69 63 61 74 69 6f 6e 2f | . "appl|ication/|
|00003bb0| 78 2d 74 72 6f 66 66 2d | 6d 65 22 29 20 28 22 2e |x-troff-|me") (".|
|00003bc0| 6d 69 66 22 20 2e 20 22 | 61 70 70 6c 69 63 61 74 |mif" . "|applicat|
|00003bd0| 69 6f 6e 2f 6d 69 66 22 | 29 20 28 22 2e 6d 6f 76 |ion/mif"|) (".mov|
|00003be0| 22 20 2e 20 22 76 69 64 | 65 6f 2f 71 75 69 63 6b |" . "vid|eo/quick|
|00003bf0| 74 69 6d 65 22 29 20 28 | 22 2e 6d 6f 76 69 65 22 |time") (|".movie"|
|00003c00| 20 2e 20 22 76 69 64 65 | 6f 2f 78 2d 73 67 69 2d | . "vide|o/x-sgi-|
|00003c10| 6d 6f 76 69 65 22 29 20 | 28 22 2e 6d 70 32 22 20 |movie") |(".mp2" |
|00003c20| 2e 20 22 61 75 64 69 6f | 2f 78 2d 6d 70 65 67 22 |. "audio|/x-mpeg"|
|00003c30| 29 20 28 22 2e 6d 70 32 | 61 22 20 2e 20 22 61 75 |) (".mp2|a" . "au|
|00003c40| 64 69 6f 2f 78 2d 6d 70 | 65 67 32 22 29 20 28 22 |dio/x-mp|eg2") ("|
|00003c50| 2e 6d 70 61 22 20 2e 20 | 22 61 75 64 69 6f 2f 78 |.mpa" . |"audio/x|
|00003c60| 2d 6d 70 65 67 22 29 20 | 28 22 2e 6d 70 61 32 22 |-mpeg") |(".mpa2"|
|00003c70| 20 2e 20 22 61 75 64 69 | 6f 2f 78 2d 6d 70 65 67 | . "audi|o/x-mpeg|
|00003c80| 32 22 29 20 28 22 2e 6d | 70 65 22 20 2e 20 22 76 |2") (".m|pe" . "v|
|00003c90| 69 64 65 6f 2f 6d 70 65 | 67 22 29 20 28 22 2e 6d |ideo/mpe|g") (".m|
|00003ca0| 70 65 67 22 20 2e 20 22 | 76 69 64 65 6f 2f 6d 70 |peg" . "|video/mp|
|00003cb0| 65 67 22 29 20 28 22 2e | 6d 70 65 67 61 22 20 2e |eg") (".|mpega" .|
|00003cc0| 20 22 61 75 64 69 6f 2f | 78 2d 6d 70 65 67 22 29 | "audio/|x-mpeg")|
|00003cd0| 20 28 22 2e 6d 70 65 67 | 76 22 20 2e 20 22 76 69 | (".mpeg|v" . "vi|
|00003ce0| 64 65 6f 2f 6d 70 65 67 | 22 29 20 28 22 2e 6d 70 |deo/mpeg|") (".mp|
|00003cf0| 67 22 20 2e 20 22 76 69 | 64 65 6f 2f 6d 70 65 67 |g" . "vi|deo/mpeg|
|00003d00| 22 29 20 28 22 2e 6d 70 | 76 22 20 2e 20 22 76 69 |") (".mp|v" . "vi|
|00003d10| 64 65 6f 2f 6d 70 65 67 | 22 29 20 28 22 2e 6d 73 |deo/mpeg|") (".ms|
|00003d20| 22 20 2e 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |" . "app|lication|
|00003d30| 2f 78 2d 74 72 6f 66 66 | 2d 6d 73 22 29 20 28 22 |/x-troff|-ms") ("|
|00003d40| 2e 6e 63 22 20 2e 20 22 | 61 70 70 6c 69 63 61 74 |.nc" . "|applicat|
|00003d50| 69 6f 6e 2f 78 2d 6e 65 | 74 63 64 66 22 29 20 28 |ion/x-ne|tcdf") (|
|00003d60| 22 2e 6e 63 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |".nc" . |"applica|
|00003d70| 74 69 6f 6e 2f 78 2d 6e | 65 74 63 64 66 22 29 20 |tion/x-n|etcdf") |
|00003d80| 28 22 2e 6f 64 61 22 20 | 2e 20 22 61 70 70 6c 69 |(".oda" |. "appli|
|00003d90| 63 61 74 69 6f 6e 2f 6f | 64 61 22 29 20 28 22 2e |cation/o|da") (".|
|00003da0| 70 62 6d 22 20 2e 20 22 | 69 6d 61 67 65 2f 78 2d |pbm" . "|image/x-|
|00003db0| 70 6f 72 74 61 62 6c 65 | 2d 62 69 74 6d 61 70 22 |portable|-bitmap"|
|00003dc0| 29 20 28 22 2e 70 64 66 | 22 20 2e 20 22 61 70 70 |) (".pdf|" . "app|
|00003dd0| 6c 69 63 61 74 69 6f 6e | 2f 70 64 66 22 29 20 28 |lication|/pdf") (|
|00003de0| 22 2e 70 67 6d 22 20 2e | 20 22 69 6d 61 67 65 2f |".pgm" .| "image/|
|00003df0| 70 6f 72 74 61 62 6c 65 | 2d 67 72 61 79 6d 61 70 |portable|-graymap|
|00003e00| 22 29 20 28 22 2e 70 69 | 63 74 22 20 2e 20 22 69 |") (".pi|ct" . "i|
|00003e10| 6d 61 67 65 2f 70 69 63 | 74 22 29 20 28 22 2e 70 |mage/pic|t") (".p|
|00003e20| 6e 67 22 20 2e 20 22 69 | 6d 61 67 65 2f 70 6e 67 |ng" . "i|mage/png|
|00003e30| 22 29 20 28 22 2e 70 6e | 6d 22 20 2e 20 22 69 6d |") (".pn|m" . "im|
|00003e40| 61 67 65 2f 78 2d 70 6f | 72 74 61 62 6c 65 2d 61 |age/x-po|rtable-a|
|00003e50| 6e 79 6d 61 70 22 29 20 | 28 22 2e 70 70 6d 22 20 |nymap") |(".ppm" |
|00003e60| 2e 20 22 69 6d 61 67 65 | 2f 70 6f 72 74 61 62 6c |. "image|/portabl|
|00003e70| 65 2d 70 69 78 6d 61 70 | 22 29 20 28 22 2e 70 73 |e-pixmap|") (".ps|
|00003e80| 22 20 2e 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |" . "app|lication|
|00003e90| 2f 70 6f 73 74 73 63 72 | 69 70 74 22 29 20 28 22 |/postscr|ipt") ("|
|00003ea0| 2e 71 74 22 20 2e 20 22 | 76 69 64 65 6f 2f 71 75 |.qt" . "|video/qu|
|00003eb0| 69 63 6b 74 69 6d 65 22 | 29 20 28 22 2e 72 61 73 |icktime"|) (".ras|
|00003ec0| 22 20 2e 20 22 69 6d 61 | 67 65 2f 78 2d 72 61 73 |" . "ima|ge/x-ras|
|00003ed0| 74 65 72 22 29 20 28 22 | 2e 72 67 62 22 20 2e 20 |ter") ("|.rgb" . |
|00003ee0| 22 69 6d 61 67 65 2f 78 | 2d 72 67 62 22 29 20 28 |"image/x|-rgb") (|
|00003ef0| 22 2e 72 74 66 22 20 2e | 20 22 61 70 70 6c 69 63 |".rtf" .| "applic|
|00003f00| 61 74 69 6f 6e 2f 72 74 | 66 22 29 20 28 22 2e 72 |ation/rt|f") (".r|
|00003f10| 74 78 22 20 2e 20 22 74 | 65 78 74 2f 72 69 63 68 |tx" . "t|ext/rich|
|00003f20| 74 65 78 74 22 29 20 28 | 22 2e 73 68 22 20 2e 20 |text") (|".sh" . |
|00003f30| 22 61 70 70 6c 69 63 61 | 74 69 6f 6e 2f 78 2d 73 |"applica|tion/x-s|
|00003f40| 68 22 29 20 28 22 2e 73 | 69 74 22 20 2e 20 22 61 |h") (".s|it" . "a|
|00003f50| 70 70 6c 69 63 61 74 69 | 6f 6e 2f 78 2d 73 74 75 |pplicati|on/x-stu|
|00003f60| 66 66 69 74 22 29 20 28 | 22 2e 73 6e 64 22 20 2e |ffit") (|".snd" .|
|00003f70| 20 22 61 75 64 69 6f 2f | 62 61 73 69 63 22 29 20 | "audio/|basic") |
|00003f80| 28 22 2e 73 72 63 22 20 | 2e 20 22 61 70 70 6c 69 |(".src" |. "appli|
|00003f90| 63 61 74 69 6f 6e 2f 78 | 2d 77 61 69 73 2d 73 6f |cation/x|-wais-so|
|00003fa0| 75 72 63 65 22 29 20 28 | 22 2e 74 61 72 22 20 2e |urce") (|".tar" .|
|00003fb0| 20 22 61 72 63 68 69 76 | 65 2f 74 61 72 22 29 20 | "archiv|e/tar") |
|00003fc0| 28 22 2e 74 63 6c 22 20 | 2e 20 22 61 70 70 6c 69 |(".tcl" |. "appli|
|00003fd0| 63 61 74 69 6f 6e 2f 78 | 2d 74 63 6c 22 29 20 28 |cation/x|-tcl") (|
|00003fe0| 22 2e 74 63 6c 22 20 2e | 20 22 61 70 70 6c 69 63 |".tcl" .| "applic|
|00003ff0| 61 74 69 6f 6e 2f 78 2d | 74 63 6c 22 29 20 28 22 |ation/x-|tcl") ("|
|00004000| 2e 74 65 78 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |.tex" . |"applica|
|00004010| 74 69 6f 6e 2f 78 2d 74 | 65 78 22 29 20 28 22 2e |tion/x-t|ex") (".|
|00004020| 74 65 78 69 22 20 2e 20 | 22 61 70 70 6c 69 63 61 |texi" . |"applica|
|00004030| 74 69 6f 6e 2f 74 65 78 | 69 6e 66 6f 22 29 20 28 |tion/tex|info") (|
|00004040| 22 2e 74 67 61 22 20 2e | 20 22 69 6d 61 67 65 2f |".tga" .| "image/|
|00004050| 78 2d 74 61 72 67 61 22 | 29 20 28 22 2e 74 69 66 |x-targa"|) (".tif|
|00004060| 22 20 2e 20 22 69 6d 61 | 67 65 2f 74 69 66 66 22 |" . "ima|ge/tiff"|
|00004070| 29 20 28 22 2e 74 69 66 | 66 22 20 2e 20 22 69 6d |) (".tif|f" . "im|
|00004080| 61 67 65 2f 74 69 66 66 | 22 29 20 28 22 2e 74 72 |age/tiff|") (".tr|
|00004090| 22 20 2e 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |" . "app|lication|
|000040a0| 2f 78 2d 74 72 6f 66 66 | 22 29 20 28 22 2e 74 72 |/x-troff|") (".tr|
|000040b0| 6f 66 66 22 20 2e 20 22 | 61 70 70 6c 69 63 61 74 |off" . "|applicat|
|000040c0| 69 6f 6e 2f 78 2d 74 72 | 6f 66 66 22 29 20 28 22 |ion/x-tr|off") ("|
|000040d0| 2e 74 73 76 22 20 2e 20 | 22 74 65 78 74 2f 74 61 |.tsv" . |"text/ta|
|000040e0| 62 2d 73 65 70 61 72 61 | 74 65 64 2d 76 61 6c 75 |b-separa|ted-valu|
|000040f0| 65 73 22 29 20 28 22 2e | 74 78 74 22 20 2e 20 22 |es") (".|txt" . "|
|00004100| 74 65 78 74 2f 70 6c 61 | 69 6e 22 29 20 28 22 2e |text/pla|in") (".|
|00004110| 76 62 73 22 20 2e 20 22 | 76 69 64 65 6f 2f 6d 70 |vbs" . "|video/mp|
|00004120| 65 67 22 29 20 28 22 2e | 76 6f 78 22 20 2e 20 22 |eg") (".|vox" . "|
|00004130| 61 75 64 69 6f 2f 62 61 | 73 69 63 22 29 20 28 22 |audio/ba|sic") ("|
|00004140| 2e 76 72 6d 6c 22 20 2e | 20 22 78 2d 77 6f 72 6c |.vrml" .| "x-worl|
|00004150| 64 2f 78 2d 76 72 6d 6c | 22 29 20 28 22 2e 77 61 |d/x-vrml|") (".wa|
|00004160| 76 22 20 2e 20 22 61 75 | 64 69 6f 2f 78 2d 77 61 |v" . "au|dio/x-wa|
|00004170| 76 22 29 20 28 22 2e 77 | 72 6c 22 20 2e 20 22 78 |v") (".w|rl" . "x|
|00004180| 2d 77 6f 72 6c 64 2f 78 | 2d 76 72 6d 6c 22 29 20 |-world/x|-vrml") |
|00004190| 28 22 2e 78 62 6d 22 20 | 2e 20 22 69 6d 61 67 65 |(".xbm" |. "image|
|000041a0| 2f 78 62 6d 22 29 20 28 | 22 2e 78 70 6d 22 20 2e |/xbm") (|".xpm" .|
|000041b0| 20 22 69 6d 61 67 65 2f | 78 2d 70 69 78 6d 61 70 | "image/|x-pixmap|
|000041c0| 22 29 20 28 22 2e 78 77 | 64 22 20 2e 20 22 69 6d |") (".xw|d" . "im|
|000041d0| 61 67 65 2f 77 69 6e 64 | 6f 77 64 75 6d 70 22 29 |age/wind|owdump")|
|000041e0| 20 28 22 2e 7a 69 70 22 | 20 2e 20 22 61 70 70 6c | (".zip"| . "appl|
|000041f0| 69 63 61 74 69 6f 6e 2f | 7a 69 70 22 29 20 28 22 |ication/|zip") ("|
|00004200| 2e 61 69 22 20 2e 20 22 | 61 70 70 6c 69 63 61 74 |.ai" . "|applicat|
|00004210| 69 6f 6e 2f 70 6f 73 74 | 73 63 72 69 70 74 22 29 |ion/post|script")|
|00004220| 20 28 22 2e 6a 70 65 22 | 20 2e 20 22 69 6d 61 67 | (".jpe"| . "imag|
|00004230| 65 2f 6a 70 65 67 22 29 | 20 28 22 2e 6a 70 65 67 |e/jpeg")| (".jpeg|
|00004240| 22 20 2e 20 22 69 6d 61 | 67 65 2f 6a 70 65 67 22 |" . "ima|ge/jpeg"|
|00004250| 29 29 20 28 23 24 20 2e | 20 2d 31 34 32 39 34 29 |)) (#$ .| -14294)|
|00004260| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 6d 6d 2d |).(defal|ias 'mm-|
|00004270| 70 61 72 73 65 2d 6d 69 | 6d 65 74 79 70 65 73 20 |parse-mi|metypes |
|00004280| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 70 61 74 |#[(&opti|onal pat|
|00004290| 68 29 20 22 08 ac 9e c1 | c2 21 ab 86 c1 c2 21 10 |h) "....|.!....!.|
|000042a0| aa 93 0b c4 73 ab 88 c5 | c6 c7 c8 23 10 aa 86 c5 |....s...|...#....|
|000042b0| c6 c9 ca 23 10 cb cc 08 | 0b cd 73 ab 83 ce aa 81 |...#....|..s.....|
|000042c0| cf 5c 22 21 d0 1e 11 89 | 1e 12 ad a0 0e 12 40 16 |.\"!....|......@.|
|000042d0| 11 d3 0e 11 21 ab 8c d4 | 0e 11 21 ab 86 d5 0e 12 |....!...|..!.....|
|000042e0| 40 21 88 0e 12 41 89 16 | 12 ac 61 d0 2a 87 22 20 |@!...A..|..a.*." |
|000042f0| 5b 70 61 74 68 20 67 65 | 74 65 6e 76 20 22 4d 49 |[path ge|tenv "MI|
|00004300| 4d 45 54 59 50 45 53 22 | 20 73 79 73 74 65 6d 2d |METYPES"| system-|
|00004310| 74 79 70 65 20 28 6d 73 | 2d 64 6f 73 20 6d 73 2d |type (ms|-dos ms-|
|00004320| 77 69 6e 64 6f 77 73 20 | 77 69 6e 64 6f 77 73 2d |windows |windows-|
|00004330| 6e 74 29 20 6d 61 70 63 | 6f 6e 63 61 74 20 65 78 |nt) mapc|oncat ex|
|00004340| 70 61 6e 64 2d 66 69 6c | 65 2d 6e 61 6d 65 20 28 |pand-fil|e-name (|
|00004350| 22 7e 2f 6d 69 6d 65 2e | 74 79 70 22 20 22 7e 2f |"~/mime.|typ" "~/|
|00004360| 65 74 63 2f 6d 69 6d 65 | 2e 74 79 70 22 29 20 22 |etc/mime|.typ") "|
|00004370| 3b 22 20 28 22 7e 2f 2e | 6d 69 6d 65 2d 74 79 70 |;" ("~/.|mime-typ|
|00004380| 65 73 22 20 22 2f 65 74 | 63 2f 6d 69 6d 65 2d 74 |es" "/et|c/mime-t|
|00004390| 79 70 65 73 3a 2f 75 73 | 72 2f 65 74 63 2f 6d 69 |ypes:/us|r/etc/mi|
|000043a0| 6d 65 2d 74 79 70 65 73 | 22 20 22 2f 75 73 72 2f |me-types|" "/usr/|
|000043b0| 6c 6f 63 61 6c 2f 65 74 | 63 2f 6d 69 6d 65 2d 74 |local/et|c/mime-t|
|000043c0| 79 70 65 73 22 20 22 2f | 75 73 72 2f 6c 6f 63 61 |ypes" "/|usr/loca|
|000043d0| 6c 2f 77 77 77 2f 63 6f | 6e 66 2f 6d 69 6d 65 2d |l/www/co|nf/mime-|
|000043e0| 74 79 70 65 73 22 29 20 | 22 3a 22 20 72 65 76 65 |types") |":" reve|
|000043f0| 72 73 65 20 6d 6d 2d 73 | 74 72 69 6e 67 2d 74 6f |rse mm-s|tring-to|
|00004400| 2d 74 6f 6b 65 6e 73 20 | 28 6d 73 2d 64 6f 73 20 |-tokens |(ms-dos |
|00004410| 6d 73 2d 77 69 6e 64 6f | 77 73 20 77 69 6e 64 6f |ms-windo|ws windo|
|00004420| 77 73 2d 6e 74 29 20 3f | 5c 3b 20 3f 5c 3a 20 6e |ws-nt) ?|\; ?\: n|
|00004430| 69 6c 20 66 6e 61 6d 65 | 20 66 6e 61 6d 65 73 20 |il fname| fnames |
|00004440| 66 69 6c 65 2d 65 78 69 | 73 74 73 2d 70 20 66 69 |file-exi|sts-p fi|
|00004450| 6c 65 2d 72 65 61 64 61 | 62 6c 65 2d 70 20 6d 6d |le-reada|ble-p mm|
|00004460| 2d 70 61 72 73 65 2d 6d | 69 6d 65 74 79 70 65 2d |-parse-m|imetype-|
|00004470| 66 69 6c 65 5d 20 36 5d | 29 0a 28 64 65 66 61 6c |file] 6]|).(defal|
|00004480| 69 61 73 20 27 6d 6d 2d | 70 61 72 73 65 2d 6d 69 |ias 'mm-|parse-mi|
|00004490| 6d 65 74 79 70 65 2d 66 | 69 6c 65 20 23 5b 28 66 |metype-f|ile #[(f|
|000044a0| 6e 61 6d 65 29 20 22 c0 | 89 89 19 1a 1b 8a c4 c5 |name) ".|........|
|000044b0| 21 71 88 c6 20 88 c7 0e | 08 21 88 c9 ca cb 5c 22 |!q.. ...|.!....\"|
|000044c0| 88 c9 cc cd 5c 22 88 c9 | ce cb 5c 22 88 64 62 88 |....\"..|..\".db.|
|000044d0| cf c0 78 88 60 64 7c 88 | 65 62 88 6d 3f ad c8 cf |..x.`d|.|eb.m?...|
|000044e0| c0 77 88 60 11 d0 c0 77 | 88 d1 09 60 5c 22 88 09 |.w.`...w|...`\"..|
|000044f0| 60 7b 13 6c ac 92 d2 c0 | 77 88 60 11 d3 c0 77 88 |`{.l....|w.`...w.|
|00004500| 09 60 7b 5c 6e 42 12 aa | 6b 5c 6e ab 51 d4 5c 6e |.`{\nB..|k\n.Q.\n|
|00004510| 40 21 d5 55 ab 84 5c 6e | 40 aa 84 d6 5c 6e 40 50 |@!.U..\n|@...\n@P|
|00004520| 0b 42 0e 17 42 16 17 5c | 6e 41 89 12 aa 61 2c 87 |.B..B..\|nA...a,.|
|00004530| 22 20 5b 6e 69 6c 20 73 | 61 76 65 2d 70 6f 73 20 |" [nil s|ave-pos |
|00004540| 65 78 74 6e 73 20 74 79 | 70 65 20 67 65 74 2d 62 |extns ty|pe get-b|
|00004550| 75 66 66 65 72 2d 63 72 | 65 61 74 65 20 22 20 2a |uffer-cr|eate " *|
|00004560| 6d 69 6d 65 2d 74 79 70 | 65 73 2a 22 20 65 72 61 |mime-typ|es*" era|
|00004570| 73 65 2d 62 75 66 66 65 | 72 20 69 6e 73 65 72 74 |se-buffe|r insert|
|00004580| 2d 66 69 6c 65 2d 63 6f | 6e 74 65 6e 74 73 20 66 |-file-co|ntents f|
|00004590| 6e 61 6d 65 20 6d 6d 2d | 72 65 70 6c 61 63 65 2d |name mm-|replace-|
|000045a0| 72 65 67 65 78 70 20 22 | 23 2e 2a 22 20 22 22 20 |regexp "|#.*" "" |
|000045b0| 22 5c 6e 2b 22 20 22 5c | 6e 22 20 22 5b 20 09 5d |"\n+" "\|n" "[ .]|
|000045c0| 2b 24 22 20 22 20 09 5c | 6e 22 20 22 5e 20 09 22 |+$" " .\|n" "^ ."|
|000045d0| 20 64 6f 77 6e 63 61 73 | 65 2d 72 65 67 69 6f 6e | downcas|e-region|
|000045e0| 20 22 20 09 22 20 22 5e | 20 09 5c 6e 22 20 73 74 | " ." "^| .\n" st|
|000045f0| 72 69 6e 67 2d 74 6f 2d | 63 68 61 72 20 3f 5c 2e |ring-to-|char ?\.|
|00004600| 20 22 2e 22 20 6d 6d 2d | 6d 69 6d 65 2d 65 78 74 | "." mm-|mime-ext|
|00004610| 65 6e 73 69 6f 6e 73 5d | 20 34 5d 29 0a 23 40 35 |ensions]| 4]).#@5|
|00004620| 38 20 52 65 74 75 72 6e | 20 74 68 65 20 4d 49 4d |8 Return| the MIM|
|00004630| 45 20 63 6f 6e 74 65 6e | 74 20 74 79 70 65 20 6f |E conten|t type o|
|00004640| 66 20 74 68 65 20 66 69 | 6c 65 20 65 78 74 65 6e |f the fi|le exten|
|00004650| 73 69 6f 6e 73 20 45 58 | 54 4e 1f 0a 28 64 65 66 |sions EX|TN..(def|
|00004660| 61 6c 69 61 73 20 27 6d | 6d 2d 65 78 74 65 6e 73 |alias 'm|m-extens|
|00004670| 69 6f 6e 2d 74 6f 2d 6d | 69 6d 65 20 23 5b 28 65 |ion-to-m|ime #[(e|
|00004680| 78 74 6e 29 20 22 08 3b | ab 8b c1 08 21 c2 61 ac |xtn) ".;|....!.a.|
|00004690| 84 c3 08 50 10 c4 08 97 | 0d 5c 22 41 87 22 20 5b |...P....|.\"A." [|
|000046a0| 65 78 74 6e 20 73 74 72 | 69 6e 67 2d 74 6f 2d 63 |extn str|ing-to-c|
|000046b0| 68 61 72 20 3f 5c 2e 20 | 22 2e 22 20 61 73 73 6f |har ?\. |"." asso|
|000046c0| 63 20 6d 6d 2d 6d 69 6d | 65 2d 65 78 74 65 6e 73 |c mm-mim|e-extens|
|000046d0| 69 6f 6e 73 5d 20 33 20 | 28 23 24 20 2e 20 31 37 |ions] 3 |(#$ . 17|
|000046e0| 39 35 34 29 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |954)]).(|defalias|
|000046f0| 20 27 6d 6d 2d 63 6f 6d | 70 6f 73 65 2d 74 79 70 | 'mm-com|pose-typ|
|00004700| 65 20 23 5b 28 74 79 70 | 65 29 20 22 c0 09 c2 c3 |e #[(typ|e) "....|
|00004710| 23 1c c5 20 1e 06 c7 c8 | 0c 5c 22 41 1e 09 c7 ca |#.. ....|.\"A....|
|00004720| 0c 5c 22 41 1e 0b cc cd | 21 1e 0e 0e 0b 3f 1e 0f |.\"A....|!....?..|
|00004730| d0 1e 11 c2 1e 12 d3 0e | 09 ae 82 0e 0b 0c 5c 22 |........|......\"|
|00004740| 16 09 d4 d5 0e 09 5c 22 | ab 96 0e 09 d6 d7 95 4f |......\"|.......O|
|00004750| 0e 06 0e 09 d6 95 c2 4f | 51 16 09 d8 16 12 aa 63 |.......O|Q......c|
|00004760| d9 0e 1a c2 0e 12 3f ad | 82 0e 0e c2 0e 1b 0e 09 |......?.|........|
|00004770| 26 06 88 0e 0f ab 86 dc | 09 dd 51 aa 81 d0 0e 12 |&.......|..Q.....|
|00004780| ab 92 8a 0e 0e 71 88 de | 20 88 df 0e 06 21 88 e0 |.....q..| ....!..|
|00004790| 20 29 aa 88 8a 0e 0e 71 | 88 e0 20 29 e1 51 89 16 | ).....q|.. ).Q..|
|000047a0| 11 2e 08 87 22 20 5b 6d | 6d 2d 6d 69 6d 65 2d 69 |...." [m|m-mime-i|
|000047b0| 6e 66 6f 20 74 79 70 65 | 20 6e 69 6c 20 35 20 69 |nfo type| nil 5 i|
|000047c0| 6e 66 6f 20 6d 6d 2d 67 | 65 6e 65 72 61 74 65 2d |nfo mm-g|enerate-|
|000047d0| 75 6e 69 71 75 65 2d 66 | 69 6c 65 6e 61 6d 65 20 |unique-f|ilename |
|000047e0| 66 6e 61 6d 20 61 73 73 | 6f 63 20 22 63 6f 6d 70 |fnam ass|oc "comp|
|000047f0| 6f 73 65 22 20 63 6f 6d | 70 20 22 63 6f 6d 70 6f |ose" com|p "compo|
|00004800| 73 65 74 79 70 65 64 22 | 20 63 74 79 70 20 67 65 |setyped"| ctyp ge|
|00004810| 74 2d 62 75 66 66 65 72 | 2d 63 72 65 61 74 65 20 |t-buffer|-create |
|00004820| 22 20 2a 6d 69 6d 65 63 | 6f 6d 70 6f 73 65 2a 22 |" *mimec|ompose*"|
|00004830| 20 62 75 66 66 20 74 79 | 70 65 69 74 20 22 22 20 | buff ty|peit "" |
|00004840| 72 65 74 76 61 6c 20 75 | 73 65 66 20 6d 6d 2d 75 |retval u|sef mm-u|
|00004850| 6e 65 73 63 61 70 65 2d | 6d 69 6d 65 2d 74 65 73 |nescape-|mime-tes|
|00004860| 74 20 73 74 72 69 6e 67 | 2d 6d 61 74 63 68 20 22 |t string|-match "|
|00004870| 5c 5c 28 5b 5e 5c 5c 5c | 5c 5d 5c 5c 29 25 73 22 |\\([^\\\|\]\\)%s"|
|00004880| 20 30 20 31 20 74 20 63 | 61 6c 6c 2d 70 72 6f 63 | 0 1 t c|all-proc|
|00004890| 65 73 73 20 73 68 65 6c | 6c 2d 66 69 6c 65 2d 6e |ess shel|l-file-n|
|000048a0| 61 6d 65 20 73 68 65 6c | 6c 2d 63 6f 6d 6d 61 6e |ame shel|l-comman|
|000048b0| 64 2d 73 77 69 74 63 68 | 20 22 43 6f 6e 74 65 6e |d-switch| "Conten|
|000048c0| 74 2d 74 79 70 65 3a 20 | 22 20 22 0d 5c 6e 0d 5c |t-type: |" ".\n.\|
|000048d0| 6e 22 20 65 72 61 73 65 | 2d 62 75 66 66 65 72 20 |n" erase|-buffer |
|000048e0| 69 6e 73 65 72 74 2d 66 | 69 6c 65 2d 63 6f 6e 74 |insert-f|ile-cont|
|000048f0| 65 6e 74 73 20 62 75 66 | 66 65 72 2d 73 74 72 69 |ents buf|fer-stri|
|00004900| 6e 67 20 22 0d 5c 6e 22 | 5d 20 38 5d 29 0a 23 40 |ng ".\n"|] 8]).#@|
|00004910| 34 39 20 52 65 74 75 72 | 6e 20 74 68 65 20 66 69 |49 Retur|n the fi|
|00004920| 6c 65 20 65 78 74 65 6e | 73 69 6f 6e 20 66 6f 72 |le exten|sion for|
|00004930| 20 63 6f 6e 74 65 6e 74 | 2d 74 79 70 65 20 54 59 | content|-type TY|
|00004940| 50 45 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6d |PE..(def|alias 'm|
|00004950| 6d 2d 74 79 70 65 2d 74 | 6f 2d 66 69 6c 65 20 23 |m-type-t|o-file #|
|00004960| 5b 28 74 79 70 65 29 20 | 22 c0 09 5c 6e 5c 22 87 |[(type) |"..\n\".|
|00004970| 22 20 5b 72 61 73 73 6f | 63 20 74 79 70 65 20 6d |" [rasso|c type m|
|00004980| 6d 2d 6d 69 6d 65 2d 65 | 78 74 65 6e 73 69 6f 6e |m-mime-e|xtension|
|00004990| 73 5d 20 33 20 28 23 24 | 20 2e 20 31 38 37 30 37 |s] 3 (#$| . 18707|
|000049a0| 29 5d 29 0a 23 40 36 33 | 20 50 6c 61 79 20 61 20 |)]).#@63| Play a |
|000049b0| 73 6f 75 6e 64 20 66 69 | 6c 65 20 69 6e 20 62 75 |sound fi|le in bu|
|000049c0| 66 66 65 72 20 42 55 46 | 46 20 28 64 65 66 61 75 |ffer BUF|F (defau|
|000049d0| 6c 74 73 20 74 6f 20 63 | 75 72 72 65 6e 74 20 62 |lts to c|urrent b|
|000049e0| 75 66 66 65 72 29 1f 0a | 28 64 65 66 61 6c 69 61 |uffer)..|(defalia|
|000049f0| 73 20 27 6d 6d 2d 70 6c | 61 79 2d 73 6f 75 6e 64 |s 'mm-pl|ay-sound|
|00004a00| 2d 66 69 6c 65 20 23 5b | 28 26 6f 70 74 69 6f 6e |-file #[|(&option|
|00004a10| 61 6c 20 62 75 66 66 29 | 20 22 08 ae 81 70 10 c1 |al buff)| "...p..|
|00004a20| c2 21 c3 1c 1d c6 65 64 | 0d 23 88 c7 70 21 88 c8 |.!....ed|.#..p!..|
|00004a30| 0d 21 88 c9 ca cb 8f 2a | 87 22 20 5b 62 75 66 66 |.!.....*|." [buff|
|00004a40| 20 6d 6d 2d 67 65 6e 65 | 72 61 74 65 2d 75 6e 69 | mm-gene|rate-uni|
|00004a50| 71 75 65 2d 66 69 6c 65 | 6e 61 6d 65 20 22 25 73 |que-file|name "%s|
|00004a60| 2e 61 75 22 20 74 20 73 | 79 6e 63 68 72 6f 6e 6f |.au" t s|ynchrono|
|00004a70| 75 73 2d 73 6f 75 6e 64 | 73 20 66 6e 61 6d 65 20 |us-sound|s fname |
|00004a80| 6d 75 6c 65 2d 77 72 69 | 74 65 2d 72 65 67 69 6f |mule-wri|te-regio|
|00004a90| 6e 2d 6e 6f 2d 63 6f 64 | 69 6e 67 2d 73 79 73 74 |n-no-cod|ing-syst|
|00004aa0| 65 6d 20 6b 69 6c 6c 2d | 62 75 66 66 65 72 20 70 |em kill-|buffer p|
|00004ab0| 6c 61 79 2d 73 6f 75 6e | 64 2d 66 69 6c 65 20 6e |lay-soun|d-file n|
|00004ac0| 69 6c 20 28 64 65 6c 65 | 74 65 2d 66 69 6c 65 20 |il (dele|te-file |
|00004ad0| 66 6e 61 6d 65 29 20 28 | 28 65 72 72 6f 72 29 29 |fname) (|(error))|
|00004ae0| 5d 20 34 20 28 23 24 20 | 2e 20 31 38 38 35 37 29 |] 4 (#$ |. 18857)|
|00004af0| 5d 29 0a 23 40 31 33 32 | 20 52 65 74 75 72 6e 20 |]).#@132| Return |
|00004b00| 61 20 6c 69 73 74 20 6f | 66 20 74 68 65 20 4d 49 |a list o|f the MI|
|00004b10| 4d 45 20 68 65 61 64 65 | 72 73 20 61 74 20 74 68 |ME heade|rs at th|
|00004b20| 65 20 74 6f 70 20 6f 66 | 20 74 68 69 73 20 62 75 |e top of| this bu|
|00004b30| 66 66 65 72 2e 20 20 49 | 66 0a 6f 70 74 69 6f 6e |ffer.  I|f.option|
|00004b40| 61 6c 20 61 72 67 75 6d | 65 6e 74 20 4e 4f 2d 44 |al argum|ent NO-D|
|00004b50| 45 4c 45 54 45 20 69 73 | 20 6e 6f 6e 2d 6e 69 6c |ELETE is| non-nil|
|00004b60| 2c 20 64 6f 6e 27 74 20 | 64 65 6c 65 74 65 20 74 |, don't |delete t|
|00004b70| 68 65 20 68 65 61 64 65 | 72 73 2e 1f 0a 28 64 65 |he heade|rs...(de|
|00004b80| 66 61 6c 69 61 73 20 27 | 6d 6d 2d 70 61 72 73 65 |falias '|mm-parse|
|00004b90| 2d 6d 69 6d 65 2d 68 65 | 61 64 65 72 73 20 23 5b |-mime-he|aders #[|
|00004ba0| 28 26 6f 70 74 69 6f 6e | 61 6c 20 6e 6f 2d 64 65 |(&option|al no-de|
|00004bb0| 6c 65 74 65 29 20 22 65 | 18 65 62 88 c1 c2 77 88 |lete) "e|.eb...w.|
|00004bc0| c3 c4 c2 c5 23 ab 84 60 | 54 aa 81 64 1e 06 c2 1e |....#..`|T..d....|
|00004bd0| 07 c2 1e 08 c2 1e 09 c2 | 1e 5c 6e c2 1e 0b 08 0e |........|.\n.....|
|00004be0| 06 7d 88 65 62 88 6d ac | b4 cc c2 77 88 60 16 07 |.}.eb.m.|...w.`..|
|00004bf0| cd c2 77 88 ce 0e 07 60 | 5c 22 88 0e 07 60 7b 16 |..w....`|\"...`{.|
|00004c00| 09 cf c2 77 88 60 16 07 | d0 c2 77 88 0e 07 60 7b |...w.`..|..w...`{|
|00004c10| 16 5c 6e 0e 09 0e 5c 6e | 42 0e 0b 42 16 0b aa 49 |.\n...\n|B..B...I|
|00004c20| 0e 11 ac 85 08 0e 06 7c | 88 0e 0b 2e 07 87 22 20 |.......||......" |
|00004c30| 5b 73 74 20 22 20 09 5c | 6e 22 20 6e 69 6c 20 72 |[st " .\|n" nil r|
|00004c40| 65 2d 73 65 61 72 63 68 | 2d 66 6f 72 77 61 72 64 |e-search|-forward|
|00004c50| 20 22 5e 0d 2a 24 22 20 | 74 20 6e 64 20 73 61 76 | "^.*$" |t nd sav|
|00004c60| 65 2d 70 6f 73 20 73 74 | 61 74 75 73 20 68 6e 61 |e-pos st|atus hna|
|00004c70| 6d 65 20 68 76 61 6c 75 | 20 72 65 73 75 6c 74 20 |me hvalu| result |
|00004c80| 22 20 09 5c 6e 0d 22 20 | 22 5e 3a 5c 6e 0d 22 20 |" .\n." |"^:\n." |
|00004c90| 64 6f 77 6e 63 61 73 65 | 2d 72 65 67 69 6f 6e 20 |downcase|-region |
|00004ca0| 22 3a 20 09 20 22 20 22 | 5e 5c 6e 0d 22 20 6e 6f |": . " "|^\n." no|
|00004cb0| 2d 64 65 6c 65 74 65 5d | 20 34 20 28 23 24 20 2e |-delete]| 4 (#$ .|
|00004cc0| 20 31 39 31 39 33 29 5d | 29 0a 23 40 31 38 39 20 | 19193)]|).#@189 |
|00004cd0| 52 65 74 75 72 6e 20 61 | 20 6c 69 73 74 20 6f 66 |Return a| list of|
|00004ce0| 20 6d 69 6d 65 2d 68 65 | 61 64 65 72 73 20 66 6f | mime-he|aders fo|
|00004cf0| 72 20 74 68 65 20 76 61 | 72 69 6f 75 73 20 62 6f |r the va|rious bo|
|00004d00| 64 79 20 70 61 72 74 73 | 20 6f 66 20 61 20 0a 6d |dy parts| of a .m|
|00004d10| 75 6c 74 69 70 61 72 74 | 20 6d 65 73 73 61 67 65 |ultipart| message|
|00004d20| 20 69 6e 20 62 75 66 66 | 65 72 20 42 55 46 20 77 | in buff|er BUF w|
|00004d30| 69 74 68 20 73 65 70 61 | 72 61 74 6f 72 20 53 45 |ith sepa|rator SE|
|00004d40| 50 41 52 41 54 4f 52 2e | 0a 54 68 65 20 64 69 66 |PARATOR.|.The dif|
|00004d50| 66 65 72 65 6e 74 20 6d | 75 6c 74 69 70 61 72 74 |ferent m|ultipart|
|00004d60| 20 73 70 65 63 73 20 61 | 72 65 20 70 75 74 20 69 | specs a|re put i|
|00004d70| 6e 20 60 6d 6d 2d 74 65 | 6d 70 6f 72 61 72 79 2d |n `mm-te|mporary-|
|00004d80| 64 69 72 65 63 74 6f 72 | 79 27 2e 1f 0a 28 64 65 |director|y'...(de|
|00004d90| 66 61 6c 69 61 73 20 27 | 6d 6d 2d 66 69 6e 64 2d |falias '|mm-find-|
|00004da0| 61 76 61 69 6c 61 62 6c | 65 2d 6d 75 6c 74 69 70 |availabl|e-multip|
|00004db0| 61 72 74 73 20 23 5b 28 | 73 65 70 61 72 61 74 6f |arts #[(|separato|
|00004dc0| 72 20 26 6f 70 74 69 6f | 6e 61 6c 20 62 75 66 29 |r &optio|nal buf)|
|00004dd0| 20 22 c0 09 c2 51 c3 89 | 89 1c 1d 1e 06 1e 07 8a | "...Q..|........|
|00004de0| 0e 08 ab 84 0e 08 71 88 | 65 62 88 c9 0e 07 c3 ca |......q.|eb......|
|00004df0| 23 83 fe 00 cb 20 cc 79 | 88 cd 79 88 60 c3 93 cb |#.... .y|..y.`...|
|00004e00| 20 c9 0e 07 c3 ca 23 ab | 85 cd 94 53 aa 81 64 c3 | .....#.|...S..d.|
|00004e10| 93 1e 0e 89 1e 0f 0e 0e | 7d 88 0e 0f 62 88 d0 d1 |........|}...b...|
|00004e20| 21 ab 8d d2 d3 d4 0e 0e | 0e 0f 5a 21 d5 b1 04 88 |!.......|..Z!....|
|00004e30| d6 20 16 06 d7 20 15 d8 | d9 0e 06 5c 22 41 ae 81 |. ... ..|...\"A..|
|00004e40| da 1e 1b dc dd 0e 1b 5c | 22 ab 8c de 0e 1b cc 94 |.......\|".......|
|00004e50| cc 95 4f 0e 1f 5c 22 15 | 29 7e 88 d8 e0 0e 06 5c |..O..\".|)~.....\|
|00004e60| 22 ab d4 d8 e0 0e 06 5c | 22 41 c3 1e 21 89 1e 5c |"......\|"A..!..\|
|00004e70| 22 ad 83 0e 5c 22 97 16 | 5c 22 d8 0e 5c 22 0e 23 |"...\"..|\"..\".#|
|00004e80| 5c 22 41 ae 88 e4 e5 0e | 5c 22 e6 51 e7 5c 22 89 |\"A.....|\".Q.\".|
|00004e90| 16 21 e8 98 ab 83 e7 16 | 21 0e 21 3b ab 8c e9 0e |.!......|!.!;....|
|00004ea0| 0f 0e 0e 0e 21 ca 24 88 | aa 88 0e 21 0e 0f 0e 0e |....!.$.|...!....|
|00004eb0| 5c 22 88 0e 21 ea 61 ac | 86 0e 0e 60 c3 93 88 2a |\"..!.a.|...`...*|
|00004ec0| eb 0e 0f 0e 0e 0d c3 ec | 25 88 0e 0f 0e 0e 7c 88 |........|%.....|.|
|00004ed0| ed 0d 42 0e 06 42 0c 42 | 14 2a 82 19 00 29 0c 2c |..B..B.B|.*...).,|
|00004ee0| 87 22 20 5b 22 5e 2d 2d | 22 20 73 65 70 61 72 61 |." ["^--|" separa|
|00004ef0| 74 6f 72 20 22 0d 2a 24 | 22 20 6e 69 6c 20 72 65 |tor ".*$|" nil re|
|00004f00| 73 75 6c 74 73 20 66 6e | 61 6d 65 20 68 65 61 64 |sults fn|ame head|
|00004f10| 65 72 73 20 73 65 70 20 | 62 75 66 20 72 65 2d 73 |ers sep |buf re-s|
|00004f20| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 74 20 |earch-fo|rward t |
|00004f30| 6d 61 6b 65 2d 6d 61 72 | 6b 65 72 20 31 20 30 20 |make-mar|ker 1 0 |
|00004f40| 6e 64 20 73 74 20 6c 6f | 6f 6b 69 6e 67 2d 61 74 |nd st lo|oking-at|
|00004f50| 20 22 5e 0d 2a 24 22 20 | 22 43 6f 6e 74 65 6e 74 | "^.*$" |"Content|
|00004f60| 2d 74 79 70 65 3a 20 74 | 65 78 74 2f 70 6c 61 69 |-type: t|ext/plai|
|00004f70| 6e 5c 6e 22 20 22 43 6f | 6e 74 65 6e 74 2d 6c 65 |n\n" "Co|ntent-le|
|00004f80| 6e 67 74 68 3a 20 22 20 | 69 6e 74 2d 74 6f 2d 73 |ngth: " |int-to-s|
|00004f90| 74 72 69 6e 67 20 22 5c | 6e 22 20 6d 6d 2d 70 61 |tring "\|n" mm-pa|
|00004fa0| 72 73 65 2d 6d 69 6d 65 | 2d 68 65 61 64 65 72 73 |rse-mime|-headers|
|00004fb0| 20 6d 6d 2d 67 65 6e 65 | 72 61 74 65 2d 75 6e 69 | mm-gene|rate-uni|
|00004fc0| 71 75 65 2d 66 69 6c 65 | 6e 61 6d 65 20 61 73 73 |que-file|name ass|
|00004fd0| 6f 63 20 22 63 6f 6e 74 | 65 6e 74 2d 74 79 70 65 |oc "cont|ent-type|
|00004fe0| 22 20 22 74 65 78 74 2f | 70 6c 61 69 6e 22 20 78 |" "text/|plain" x|
|00004ff0| 20 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 22 6e | string-|match "n|
|00005000| 61 6d 65 3d 5c 22 2a 5c | 5c 28 5b 5e 20 5c 22 5d |ame=\"*\|\([^ \"]|
|00005010| 2b 5c 5c 29 5c 22 2a 22 | 20 65 78 70 61 6e 64 2d |+\\)\"*"| expand-|
|00005020| 66 69 6c 65 2d 6e 61 6d | 65 20 6d 6d 2d 74 65 6d |file-nam|e mm-tem|
|00005030| 70 6f 72 61 72 79 2d 64 | 69 72 65 63 74 6f 72 79 |porary-d|irectory|
|00005040| 20 22 63 6f 6e 74 65 6e | 74 2d 74 72 61 6e 73 66 | "conten|t-transf|
|00005050| 65 72 2d 65 6e 63 6f 64 | 69 6e 67 22 20 63 6d 64 |er-encod|ing" cmd|
|00005060| 20 63 6f 64 69 6e 67 20 | 6d 6d 2d 63 6f 6e 74 65 | coding |mm-conte|
|00005070| 6e 74 2d 74 72 61 6e 73 | 66 65 72 2d 65 6e 63 6f |nt-trans|fer-enco|
|00005080| 64 69 6e 67 73 20 72 65 | 61 64 2d 73 74 72 69 6e |dings re|ad-strin|
|00005090| 67 20 22 48 6f 77 20 73 | 68 61 6c 6c 20 49 20 64 |g "How s|hall I d|
|000050a0| 65 63 6f 64 65 20 22 20 | 22 3f 20 22 20 22 63 61 |ecode " |"? " "ca|
|000050b0| 74 22 20 22 22 20 73 68 | 65 6c 6c 2d 63 6f 6d 6d |t" "" sh|ell-comm|
|000050c0| 61 6e 64 2d 6f 6e 2d 72 | 65 67 69 6f 6e 20 69 67 |and-on-r|egion ig|
|000050d0| 6e 6f 72 65 20 77 72 69 | 74 65 2d 72 65 67 69 6f |nore wri|te-regio|
|000050e0| 6e 20 35 20 22 6d 6d 2d | 66 69 6c 65 6e 61 6d 65 |n 5 "mm-|filename|
|000050f0| 22 5d 20 37 20 28 23 24 | 20 2e 20 31 39 36 36 34 |"] 7 (#$| . 19664|
|00005100| 29 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 6d |)]).(def|alias 'm|
|00005110| 6d 2d 66 6f 72 6d 61 74 | 2d 6d 75 6c 74 69 70 61 |m-format|-multipa|
|00005120| 72 74 2d 61 73 2d 68 74 | 6d 6c 20 23 5b 28 26 6f |rt-as-ht|ml #[(&o|
|00005130| 70 74 69 6f 6e 61 6c 20 | 62 75 66 20 74 79 70 65 |ptional |buf type|
|00005140| 29 20 22 08 ab 83 08 71 | 88 c1 c2 0b 5c 22 ad 88 |) "....q|....\"..|
|00005150| c4 0b c5 94 c5 95 4f 21 | 1e 06 c7 0e 06 21 1e 08 |......O!|.....!..|
|00005160| c9 20 88 ca cb cc cd ce | cf d0 d1 d2 d3 d4 d5 d6 |. ......|........|
|00005170| 0e 08 d7 23 d8 d9 da db | 0e 1c dd b1 12 2a 87 22 |...#....|.....*."|
|00005180| 20 5b 62 75 66 20 73 74 | 72 69 6e 67 2d 6d 61 74 | [buf st|ring-mat|
|00005190| 63 68 20 22 62 6f 75 6e | 64 61 72 79 5b 20 09 5d |ch "boun|dary[ .]|
|000051a0| 2a 3d 5b 20 09 5c 22 5d | 2a 5c 5c 28 5b 5e 20 5c |*=[ .\"]|*\\([^ \|
|000051b0| 22 09 5c 6e 5d 2b 5c 5c | 29 22 20 74 79 70 65 20 |".\n]+\\|)" type |
|000051c0| 72 65 67 65 78 70 2d 71 | 75 6f 74 65 20 31 20 62 |regexp-q|uote 1 b|
|000051d0| 6f 75 6e 64 61 72 79 20 | 6d 6d 2d 66 69 6e 64 2d |oundary |mm-find-|
|000051e0| 61 76 61 69 6c 61 62 6c | 65 2d 6d 75 6c 74 69 70 |availabl|e-multip|
|000051f0| 61 72 74 73 20 70 61 72 | 74 73 20 65 72 61 73 65 |arts par|ts erase|
|00005200| 2d 62 75 66 66 65 72 20 | 22 3c 68 74 6d 6c 3e 5c |-buffer |"<html>\|
|00005210| 6e 22 20 22 20 3c 68 65 | 61 64 3e 5c 6e 22 20 22 |n" " <he|ad>\n" "|
|00005220| 20 20 3c 74 69 74 6c 65 | 3e 4d 75 6c 74 69 70 61 |  <title|>Multipa|
|00005230| 72 74 20 4d 65 73 73 61 | 67 65 3c 2f 74 69 74 6c |rt Messa|ge</titl|
|00005240| 65 3e 5c 6e 22 20 22 20 | 3c 2f 68 65 61 64 3e 5c |e>\n" " |</head>\|
|00005250| 6e 22 20 22 20 3c 62 6f | 64 79 3e 5c 6e 22 20 22 |n" " <bo|dy>\n" "|
|00005260| 20 20 20 3c 68 31 3e 20 | 4d 75 6c 74 69 70 61 72 |   <h1> |Multipar|
|00005270| 74 20 6d 65 73 73 61 67 | 65 20 65 6e 63 6f 75 6e |t messag|e encoun|
|00005280| 74 65 72 65 64 20 3c 2f | 68 31 3e 5c 6e 22 20 22 |tered </|h1>\n" "|
|00005290| 20 20 20 3c 70 3e 20 49 | 20 68 61 76 65 20 65 6e |   <p> I| have en|
|000052a0| 63 6f 75 6e 74 65 72 65 | 64 20 61 20 6d 75 6c 74 |countere|d a mult|
|000052b0| 69 70 61 72 74 20 4d 49 | 4d 45 20 6d 65 73 73 61 |ipart MI|ME messa|
|000052c0| 67 65 2e 5c 6e 22 20 22 | 20 20 20 20 20 20 20 54 |ge.\n" "|       T|
|000052d0| 68 65 20 66 6f 6c 6c 6f | 77 69 6e 67 20 70 61 72 |he follo|wing par|
|000052e0| 74 73 20 68 61 76 65 20 | 62 65 65 6e 20 64 65 74 |ts have |been det|
|000052f0| 65 63 74 65 64 2e 20 20 | 50 6c 65 61 73 65 5c 6e |ected.  |Please\n|
|00005300| 22 20 22 20 20 20 20 20 | 20 20 73 65 6c 65 63 74 |" "     |  select|
|00005310| 20 77 68 69 63 68 20 6f | 6e 65 20 79 6f 75 20 77 | which o|ne you w|
|00005320| 61 6e 74 20 74 6f 20 76 | 69 65 77 2e 5c 6e 22 20 |ant to v|iew.\n" |
|00005330| 22 20 20 20 3c 2f 70 3e | 5c 6e 22 20 22 20 20 20 |"   </p>|\n" "   |
|00005340| 3c 75 6c 3e 5c 6e 22 20 | 6d 61 70 63 6f 6e 63 61 |<ul>\n" |mapconca|
|00005350| 74 20 23 5b 28 78 29 20 | 22 c0 c1 c2 0b 5c 22 41 |t #[(x) |"....\"A|
|00005360| c4 c1 c5 0b 5c 22 41 ae | 81 c6 c7 c1 c8 0b 5c 22 |....\"A.|......\"|
|00005370| 41 ae 81 c9 ca b0 07 87 | 22 20 5b 22 20 20 20 20 |A.......|" ["    |
|00005380| 3c 6c 69 3e 20 3c 61 20 | 68 72 65 66 3d 5c 22 66 |<li> <a |href=\"f|
|00005390| 69 6c 65 3a 22 20 61 73 | 73 6f 63 20 22 6d 6d 2d |ile:" as|soc "mm-|
|000053a0| 66 69 6c 65 6e 61 6d 65 | 22 20 78 20 22 5c 22 3e |filename|" x "\">|
|000053b0| 22 20 22 63 6f 6e 74 65 | 6e 74 2d 64 65 73 63 72 |" "conte|nt-descr|
|000053c0| 69 70 74 69 6f 6e 22 20 | 22 22 20 22 2d 2d 22 20 |iption" |"" "--" |
|000053d0| 22 63 6f 6e 74 65 6e 74 | 2d 74 79 70 65 22 20 22 |"content|-type" "|
|000053e0| 75 6e 6b 6e 6f 77 6e 20 | 74 79 70 65 22 20 22 3c |unknown |type" "<|
|000053f0| 2f 61 3e 20 3c 2f 6c 69 | 3e 22 5d 20 38 5d 20 22 |/a> </li|>"] 8] "|
|00005400| 5c 6e 22 20 22 20 20 20 | 3c 2f 75 6c 3e 5c 6e 22 |\n" "   |</ul>\n"|
|00005410| 20 22 20 3c 2f 62 6f 64 | 79 3e 5c 6e 22 20 22 3c | " </bod|y>\n" "<|
|00005420| 2f 68 74 6d 6c 3e 5c 6e | 22 20 22 3c 21 2d 2d 20 |/html>\n|" "<!-- |
|00005430| 41 75 74 6f 6d 61 74 69 | 63 61 6c 6c 79 20 67 65 |Automati|cally ge|
|00005440| 6e 65 72 61 74 65 64 20 | 62 79 20 4d 4d 20 76 22 |nerated |by MM v"|
|00005450| 20 6d 6d 2d 76 65 72 73 | 69 6f 6e 20 22 2d 2d 3e | mm-vers|ion "-->|
|00005460| 5c 6e 22 5d 20 31 38 5d | 29 0a 28 64 65 66 61 6c |\n"] 18]|).(defal|
|00005470| 69 61 73 20 27 6d 6d 2d | 6d 75 6c 74 69 70 61 72 |ias 'mm-|multipar|
|00005480| 74 2d 76 69 65 77 65 72 | 20 23 5b 6e 69 6c 20 22 |t-viewer| #[nil "|
|00005490| c0 70 c1 c2 0b 5c 22 41 | 5c 22 88 70 1c c5 20 29 |.p...\"A|\".p.. )|
|000054a0| 87 22 20 5b 6d 6d 2d 66 | 6f 72 6d 61 74 2d 6d 75 |." [mm-f|ormat-mu|
|000054b0| 6c 74 69 70 61 72 74 2d | 61 73 2d 68 74 6d 6c 20 |ltipart-|as-html |
|000054c0| 61 73 73 6f 63 20 22 63 | 6f 6e 74 65 6e 74 2d 74 |assoc "c|ontent-t|
|000054d0| 79 70 65 22 20 75 72 6c | 2d 63 75 72 72 65 6e 74 |ype" url|-current|
|000054e0| 2d 6d 69 6d 65 2d 68 65 | 61 64 65 72 73 20 77 33 |-mime-he|aders w3|
|000054f0| 2d 77 6f 72 6b 69 6e 67 | 2d 62 75 66 66 65 72 20 |-working|-buffer |
|00005500| 77 33 2d 70 72 65 70 61 | 72 65 2d 62 75 66 66 65 |w3-prepa|re-buffe|
|00005510| 72 5d 20 35 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |r] 5]).(|defalias|
|00005520| 20 27 6d 6d 2d 64 65 63 | 6f 64 65 2d 71 75 6f 74 | 'mm-dec|ode-quot|
|00005530| 65 64 2d 70 72 69 6e 74 | 61 62 6c 65 20 23 5b 28 |ed-print|able #[(|
|00005540| 26 6f 70 74 69 6f 6e 61 | 6c 20 73 74 20 6e 64 29 |&optiona|l st nd)|
|00005550| 20 22 08 ae 81 65 10 09 | ae 81 64 11 8c 08 09 7d | "...e..|..d....}|
|00005560| 88 8a c2 1b 65 62 88 c4 | c5 c2 c6 23 ab 96 c7 c8 |....eb..|...#....|
|00005570| c9 ca 94 54 66 21 cb 5f | c9 ca 95 53 66 21 5c 5c |...Tf!._|...Sf!\\|
|00005580| 21 21 88 aa 63 2a 64 62 | 29 87 22 20 5b 73 74 20 |!!..c*db|)." [st |
|00005590| 6e 64 20 6e 69 6c 20 62 | 75 66 66 65 72 2d 72 65 |nd nil b|uffer-re|
|000055a0| 61 64 2d 6f 6e 6c 79 20 | 72 65 2d 73 65 61 72 63 |ad-only |re-searc|
|000055b0| 68 2d 66 6f 72 77 61 72 | 64 20 22 3d 5b 30 2d 39 |h-forwar|d "=[0-9|
|000055c0| 41 2d 46 5d 5b 30 2d 39 | 41 2d 46 5d 22 20 74 20 |A-F][0-9|A-F]" t |
|000055d0| 72 65 70 6c 61 63 65 2d | 6d 61 74 63 68 20 63 68 |replace-|match ch|
|000055e0| 61 72 2d 74 6f 2d 73 74 | 72 69 6e 67 20 6d 6d 2d |ar-to-st|ring mm-|
|000055f0| 68 65 78 2d 63 68 61 72 | 2d 74 6f 2d 69 6e 74 65 |hex-char|-to-inte|
|00005600| 67 65 72 20 30 20 31 36 | 5d 20 35 20 6e 69 6c 20 |ger 0 16|] 5 nil |
|00005610| 6e 69 6c 5d 29 0a 23 40 | 36 30 20 54 61 6b 65 20 |nil]).#@|60 Take |
|00005620| 61 20 63 68 61 72 20 61 | 6e 64 20 72 65 74 75 72 |a char a|nd retur|
|00005630| 6e 20 69 74 73 20 76 61 | 6c 75 65 20 61 73 20 69 |n its va|lue as i|
|00005640| 66 20 69 74 20 77 61 73 | 20 61 20 68 65 78 20 64 |f it was| a hex d|
|00005650| 69 67 69 74 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |igit...(|defalias|
|00005660| 20 27 6d 6d 2d 68 65 78 | 2d 63 68 61 72 2d 74 6f | 'mm-hex|-char-to|
|00005670| 2d 69 6e 74 65 67 65 72 | 20 23 5b 28 63 68 61 72 |-integer| #[(char|
|00005680| 61 63 74 65 72 29 20 22 | 08 c1 59 ab 89 08 c2 58 |acter) "|..Y....X|
|00005690| ab 84 08 c1 5a 87 c3 08 | c4 5c 22 89 1d c6 59 ab |....Z...|.\"...Y.|
|000056a0| 8a 0d c7 58 ab 85 0d c8 | 5a aa 86 c9 ca cb 0d 5c |...X....|Z......\|
|000056b0| 22 21 29 87 22 20 5b 63 | 68 61 72 61 63 74 65 72 |"!)." [c|haracter|
|000056c0| 20 3f 30 20 3f 39 20 6c | 6f 67 69 6f 72 20 33 32 | ?0 ?9 l|ogior 32|
|000056d0| 20 63 68 20 3f 61 20 3f | 66 20 38 37 20 65 72 72 | ch ?a ?|f 87 err|
|000056e0| 6f 72 20 66 6f 72 6d 61 | 74 20 22 49 6e 76 61 6c |or forma|t "Inval|
|000056f0| 69 64 20 68 65 78 20 64 | 69 67 69 74 20 60 25 63 |id hex d|igit `%c|
|00005700| 27 2e 22 5d 20 35 20 28 | 23 24 20 2e 20 32 32 30 |'."] 5 (|#$ . 220|
|00005710| 34 33 29 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |43)]).(b|yte-code|
|00005720| 20 22 c0 c1 21 88 c2 c3 | 21 87 22 20 5b 72 65 71 | "..!...|!." [req|
|00005730| 75 69 72 65 20 62 61 73 | 65 36 34 20 70 72 6f 76 |uire bas|e64 prov|
|00005740| 69 64 65 20 6d 6d 5d 20 | 32 29 0a                |ide mm] |2).     |
+--------+-------------------------+-------------------------+--------+--------+